RE: The YAPC Quest

[Anonymous Monk]

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; }

[Anonymous Monk]

Crap. Looks like something obfuscated it for me a bit.

[makar]

I believe if you drop some <code> tags around your text you would have your formatting stay intact.

[Ozymandias]

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

[Anonymous Monk]

#!/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.