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

$question=$tobe || !$tobe;

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

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


$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.