Re^2: The trouble with Perl Idiom

Pretty :)

sub getRef {
    my $self = shift;

    $_
        and ref $_
            and $_ = $self->getNodeById($_)
                for @_;

    ref shift;
}
[download]

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

Comment on Re^2: The trouble with Perl Idiom Download Code

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.