CUFP
usemodperl
<b>One line web interface to the 3 main Perl search engines
at Perldoc, CPAN and Perlmonks with 3 lovely camels!</b>
Handcrafted in quirks mode with white text on a CPAN blue
background, the camel favicon and camel background are
inlined from perl.com, while a big unicode camel links to
Perlmonks Super Search. It writes the page to an
HTML file and tries to open it in the preferred web
browser of most operating systems:
<br><br>
<b>Screenshot:</b> [http://i67.tinypic.com/14a96jk.jpg]
<br><br>
<code>
perl -e'$u="use.perl.html";open$o,">$u"||die"$!";print$o q(<html><head><title>#!/usr/bin/perl</title><link rel="icon" href="https://www.perl.com/favicon.ico" type="image/x-icon"><style>body{font-family:sans-serif}.c{background-color:#006699;color:#FFFFFF}.a{position:absolute}</style><script type=text/javascript>pd="https://perldoc.perl.org/search.html";cp="https://metacpan.org/search"</script></head><body class=c onload=document.f.q.focus()><div style="background-image:url(https://www.perl.com/images/site/Perl_Camel.svg);background-repeat:no-repeat;background-size:cover;width:100%;height:100%;opacity:0.2"></div><div style=top:0px;left:0px;width:100% class=a><ul><h1>USE<span style=float:right><span style=top:15px;left:25% class=a><FORM name=f><input type=submit value=PERLDOC class=c onclick="document.f.action=pd;document.f.submit()"> <input name=q id=q type=text size=22 class=c> <input type=submit value=CPAN class=c onclick="document.f.action=cp;document.f.submit"></FORM></span></span></h1></div><a href=https://perlmonks.org/?node=Super%20Search style=text-decoration:none;font-size:64px;right:6px;top:6px class=a>🐪 </a><span style=font-size:10em;bottom:15px;left:50px class=a>PERL!</span></body></html>);close$o;$_=$^O;if(/darwin/){$x="open $u"}elsif(/m(swin|sys)/){$x=q(start "" "$u")}elsif(/cyg/){$x=q(cmd.exe /c start "" "$u ")}else{$x="xdg-open $u"}system$x'
</code>
<br><br>
<div class="pmsig"><div class="pmsig-1216830">
<sub><b>STOP REINVENTING WHEELS ⚛ START BUILDING SPACE ROCKETS!</b>—[https://www.cpan.org/|CPAN]</sub> 🐪
</div></div>