Just don't use strict and -w ;-)
&now($the_end == 'near') && so(); $i->face($the, $#curtain); my ($friends, $i, $say); $it->clear(); $i->state(my $case_of); `which +$i->m('certain')`; $i->lived($a_life{'thats full'}), $i->travelled($each && $every{'highw +ay'}); &more($much > $this), $i->did($it); my $way;


Jouke Visser, Perl 'Adept'

Replies are listed 'Best First'.
Re: My Way - Frank Sinatra
by dws (Chancellor) on Mar 21, 2001 at 02:43 UTC
    ($the, $#curtain) is a nice touch. Well done.
Re: My Way - Frank Sinatra
by thabenksta (Pilgrim) on Mar 21, 2001 at 02:19 UTC

    Bravo!!!

    my $name = 'Ben Kittrell'; $name=~s/^(.+)\s(.).+$/\L$1$2/g; my $nick = 'tha' . $name . 'sta';