X-Git-Url: https://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=resume%2FResumeJanKratochvil.pm;h=d9ab10009fc368753fa0f8d0588dae4c628568d4;hp=9691fc3e17cf7558c490a6af1e0dd959974569ab;hb=765de41d289e111715ab21806dc4631ba5d29288;hpb=eee3fecac4abad5f53c5c161ffdd65505746733f

diff --git a/resume/ResumeJanKratochvil.pm b/resume/ResumeJanKratochvil.pm
index 9691fc3..d9ab100 100644
--- a/resume/ResumeJanKratochvil.pm
+++ b/resume/ResumeJanKratochvil.pm
@@ -25,7 +25,6 @@ use strict;
 use warnings;
 
 use My::Web;
-require Crypt::Rot13;
 Wrequire 'project::Lib';
 Wrequire 'product::Lib';
 
@@ -46,7 +45,7 @@ my($self)=@_;
 		                       a_href('/resume/ResumeJanKratochvil.pdf','PDF'),
 		                       a_href('/resume/ResumeJanKratochvil.txt','text'),
 		                       )." ]",
-		"OpenPGP" =>a_href('/pgp-JanKratochvil.txt','4D2089DB'),
+		"OpenPGP" =>a_href('/pgp-JanKratochvil.txt','1E3AD15E'),
 	);
 }
 
@@ -129,9 +128,8 @@ my($mail,$fullname)=@_;
 	$r.='<td>';
 		$r.=$fullname;
 		if (lc($W->{"args"}{"referees"}) eq "referees") {
-			my $rot13=Crypt::Rot13->new();
-			$rot13->charge($mail);
-			$mail=($rot13->rot13())[0];
+			# &Crypt::Rot13::rot13
+			$mail=~tr/a-zA-Z/n-za-mN-ZA-M/;
 			$r.=' &lt;'.a_href("mailto:$mail").'&gt;';
 			}
 	$r.='</td>';
@@ -168,7 +166,8 @@ print <<"HERE";
 
 @{[ vskip "2ex" ]}
 
-<p>Not looking for a new job.</p>
+@{[ # <p>Not looking for a new job.</p>
+]}
 
 @{[ vskip "2ex" ]}
 
@@ -177,7 +176,9 @@ print <<"HERE";
 <tr><th>Date</th><th>Company</th>
 		<th>Description</th></tr>
 <tr><td>2006/07-...</td><td class="com">@{[ a_href 'http://www.redhat.com/','Red Hat' ]}</td>
-		<td>GNU Compiler Tools development: primarily @{[ a_href 'http://www.gnu.org/software/gdb/','GDB' ]}</td></tr>
+		<td>
+			@{[ a_href 'https://en.wikipedia.org/wiki/LLDB_(debugger)','LLDB' ]} development, @{[ a_href 'https://en.wikipedia.org/wiki/Executable_and_Linkable_Format','ELF' ]}, @{[ a_href 'https://en.wikipedia.org/wiki/DWARF','DWARF' ]}, @{[ a_href 'https://en.wikipedia.org/wiki/ptrace','ptrace' ]}, @{[ a_href 'https://en.wikipedia.org/wiki/Call_stack#Unwinding','unwinding' ]}, @{[ a_href 'https://en.wikipedia.org/wiki/Application_binary_interface','ABI' ]}, formerly @{[ a_href 'https://en.wikipedia.org/wiki/GNU_Debugger','GDB' ]} development
+		</td></tr>
 <tr><td>2005/04-11</td><td class="com">@{[
 						a_href_cc {""=>'http://www.valinux.co.jp/en/',
 						         "JP"=>'http://www.valinux.co.jp/'},'VA Linux Systems Japan' ]}</td>
@@ -338,7 +339,7 @@ print <<"HERE";
 <tr><td class="tab-head">Protocols    </td><td>GSM SMS/PDU/Nokia&nbsp;Smart&nbsp;Messaging/EMS/WAP/WTP/WSP/MMSE/SMIL/WML/AMR/ETSI stds/3GPP stds,
                                                IPv4, HTTP, SMTP/RFC822/MIME, FTP, SSH, DHCP, POP3, IMAP4, NFS v2/v3, PPP/LCP/IPCP,...</td></tr>
 <tr><td class="tab-head">Filesystems  </td><td>ext2, FAT, AmigaFFS, ISO-9660</td></tr>
-<tr><td class="tab-head">Certificates </td><td>@{[ a_href('http://www.redhat.com/rhce/rhce805008572734652.html','RHCE') ]}</td></tr>
+<tr><td class="tab-head">Certificates </td><td>@{[ a_href('https://www.redhat.com/rhtapps/certification/verify/?certId=110-518-099','RHCE 110-518-099') ]}</td></tr>
 </table>
 
 @{[ vskip "2ex" ]}