http://www.perlmonks.org?node_id=39760

Just some popular lines from popular shakespeare plays translated into perl.

$question=$tobe || !$tobe;

sub pricking{shift;$wicked{'something'}->comes('way'=>'this');}
my $thumb;
pricking($thumb);

Romeo{'Romeo'}->why('name'=>'Romeo'); Update:added quote

$toil*=2;$trouble*=2;
$fire->burn();$cauldron->bubble();

$east=$window->break('what'=>'light','where'=>'through yonder');
$juliet=new sun();$juliet->slay('moon'); Update: Made $juliet a sun, instead of a string.

I'll probably think up somemore later. i haven't read as much shakespeare as most people have, so I'm sure some of you can top me.

@:::::::((==========Rydor====>