Re^2: Popularity of Perl as opposed to other languages

Shouldn't that module do something more like this?

use Inline::Files;
use Inline PERL;

greeting("PERL");

__PERL__
SUB greeting {
    $foo = SHIFT @_ || $_[0];
    $! = 1; # Turn buffering off
    FOR ($i=1, $i<=10, $i++) {
        @a[$i] = $i;
    }
    LOCAL $length = @a;
    PRINT "Hello, $foo\n";
}
[download]

Comment on Re^2: Popularity of Perl as opposed to other languages Download Code

Replies are listed 'Best First'.
Re^3: Popularity of Perl as opposed to other languages by Burak (Chaplain) on Jun 02, 2008 at 18:12 UTC
haha :D that was funny :)	[reply]