in reply to Thinking in perl

use strict;
my @answer = qw(Not so much perl as perlmonks - I recently tried to ++
+ an article on the register. Doh!);
foreach (@answer){print "$_ ";}
print "\n";

[download]

VGhpcyBtZXNzYWdlIGludGVudGlvbmFsbHkgcG9pbnRsZXNz

Replies are listed 'Best First'.
Re^2: Thinking in perl
by wolfger (Deacon) on Feb 22, 2005 at 19:52 UTC

    #!/usr/bin/perl
    use strict;
    use warnings;
    use less 'java';
    print <DATA>;
    __DATA__
    You forgot your she-bang and -w


    --
    Linux, sci-fi, and Nat Torkington, all at Penguicon 3.0
    perl -e 'print(map(chr,(0x4a,0x41,0x50,0x48,0xa)))'
[reply]
[d/l]

In Section Meditations