in reply to The YAPC Quest

At a class and don't have any kind of PERL to check the correctness, here it is anyway: #!/usr/bin/perl # desparate.pl use Tact; use Courtesy; my $dear; $tonight = join($me,@dinner); @least = split(/$me/,$sundae); for (;$_iam gt "nothing";) { while (not $perfect) { $i_am = abs $nice; } } open ILLBE, ">yourneeds"; @night = ('I\'ll', ' hold', ' you', ' close' . " keep you safe"); $me = consider($my_offer); sub consider { study $_[0]; return $youranswer; }

Replies are listed 'Best First'.
RE: RE: The YAPC Quest
by Ozymandias (Hermit) on Jun 22, 2000 at 01:09 UTC
    The formatted version:

    At a class and don't have any kind of PERL to check the correctness, here it is anyway:
    #!/usr/bin/perl # desparate.pl use Tact; use Courtesy; my $dear; $tonight = join($me,@dinner); @least = split(/$me/,$sundae); for (;$_iam gt "nothing";) { while (not $perfect) { $i_am = abs $nice; } } open ILLBE, ">yourneeds"; @night = ('I\'ll', ' hold', ' you', ' close' . " keep you safe"); $me = consider($my_offer); sub consider { study $_<a href="/index.pl?node=0&amp;lastnode_id=19337">0</a>; return $youranswer; }

    - Ozymandias

RE: RE: The YAPC Quest
by Anonymous Monk on Jun 22, 2000 at 01:18 UTC
    #!/usr/bin/perl # desparate.pl use Tact; use Courtesy; my $dear; $tonight = join($me,@dinner); @least = split(/$me/,$sundae); for (;$_iam gt "nothing";) { while (not $perfect) { $i_am = abs $nice; } } open ILLBE, ">yourneeds"; @night = ('I\'ll', ' hold', ' you', ' close' . " keep you safe"); $me = consider($my_offer); sub consider { study $_[0]; return $youranswer; }
    There, much better.
RE: RE: The YAPC Quest
by Anonymous Monk on Jun 22, 2000 at 01:04 UTC
    Crap. Looks like something obfuscated it for me a bit.
      I believe if you drop some <code> tags around your text you would have your formatting stay intact.