sub alone{print shift} sub ##################################################### survive{alone "\n...or live like this for ever"} alone 'i am ';@falling =('deeper',"than ever\n"); $destruction = 'Simple'; $sex = 'use '; sub for{love} sub but{alone "more"} @drugs = split(//,'HELP');&but;alone " afraid ".@falling[1]; sub find_help{"help my".(shift)."\n"} sub self{"must ".find_help(shift)} my $depression = 'hell'; $options = $sex.join('W',@drugs[2..3])."::".$destruction; eval $options; get($depression.'://www.depressedanon.com/')=~ /psychology, (.*?)-help/ unless !($depression=~s/ell/ttp/); @try_T = split(/my/,self($destruction)); alone "i ".eval "\&$1('$1')";@try_T[0] =~ s/\s/ find /;"peace" unless alone "i ".@try_T[0]; survive
Franck Binard
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Might be slightly depressed 2day :-(
by zentara (Archbishop) on Sep 11, 2005 at 09:21 UTC | |
Re: Might be slightly depressed 2day :-(
by marto (Cardinal) on Sep 10, 2005 at 21:59 UTC | |
The authentic path to approach art
by chanio (Priest) on Sep 11, 2005 at 03:07 UTC |
Back to
Perl Poetry