<?xml version="1.0" encoding="windows-1252"?>
<node id="96947" title="Re: The Perl Diner" created="2001-07-16 03:45:07" updated="2005-07-19 14:08:39">
<type id="11">
note</type>
<author id="1936">
japhy</author>
<data>
<field name="doctext">
I'm quite a &lt;i&gt;connisseur&lt;/i&gt; when it comes to Perl foods...

&lt;code&gt;
sub eggs { return }

chop $suey;

corned(%48879);

readlink($pig); unlink($hog); link($sow, $swine);

1 while fork;

#include "perl.h"

"beans"

tie %mozarella, 'DB_File';

@soup = (A..Z,a..z);
&lt;/code&gt;

And the answers, of course...

&lt;table&gt;&lt;tr&gt;&lt;td bgcolor="#ffffff"&gt;&lt;font color="#ffffff"&gt;
&lt;code&gt;
eggs over easy

chop suey

corned beef hash

sausage links

vegetables

sushi (bonus points if you get the joke)

string beans

mozarella sticks

alphabet soup
&lt;/code&gt;
&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;

&lt;p&gt;
&lt;font color="#ff0000"&gt;_____________________________________________________&lt;/font&gt;&lt;br&gt;
Jeff &lt;tt&gt;&lt;font color="#0000ff"&gt;&lt;A HREF="/index.pl?node=japhy&amp;lastnode_id=1072"&gt;japhy&lt;/A&gt;&lt;/font&gt;&lt;/tt&gt; Pinyan:

&lt;a href="http://www.pobox.com/~japhy/modules/"&gt;Perl&lt;/a&gt;,

&lt;a href="http://www.pobox.com/~japhy/docs/book.html"&gt;regex&lt;/a&gt;,

and &lt;a href="http://lists.perl.org/showlist.cgi?name=perl5-porters"&gt;&lt;i&gt;perl&lt;/i&gt;&lt;/a&gt;

&lt;a href="http://foldoc.doc.ic.ac.uk/foldoc/foldoc.cgi?query=hacker"&gt;hacker&lt;/a&gt;.

&lt;br&gt;

&lt;tt&gt;s++=END;++y(;-P)}y js++=;shajsj&lt;++y(p-q)}?print:??;&lt;/tt&gt;</field>
<field name="root_node">
96943</field>
<field name="parent_node">
96943</field>
</data>
</node>
