my $W=My::Web->init(
"__PACKAGE__"=>__PACKAGE__,
"title"=>'Homepage',
+ "no_job"=>1,
);
My::Web->heading();
hand! Those nights lying awake feeling foolish for having that extra VFAT
partition just to exchange files between GNU/Linux and MS-Windows are over!</p>
-<table border="0" style="margin: 4ex; padding: 2ex; background: #441111; font-size: larger;">
+<table border="0" style="margin: 4ex; padding: 2ex; background: #552222; font-size: larger;">
<tr><td>
<b>A programmer for hire:</b>
<span style="color: #ffaaaa;">
"footing"=>sub () {
# print "<h1>footing</h1>\n";
},
+ "footing_delimit"=>sub () {
+ return if $My::Web::W->{"no_job"};
+ print <<"HERE";
+<table border="0" style="margin: 4ex; padding: 2ex; background: #552222;">
+ <tr><td>
+ <b>A programmer for hire:</b>
+ <span style="color: #ffaaaa;">
+ I am looking for new challenges.
+ If you find the software here useful, please
+ @{[ My::Web::a_href($My::Web::W->{"resume_url"},'consider me') ]}
+ for your next software project.
+ </span>
+ </td></tr>
+</table>
+HERE
+ },
);
1;