sub blartg {
    my $foo = shift;

.
.
.
sub blartg {
    my $foo = shift;
    my $bar = shift;
    my $baz = shift;
...
[download]

What I don't like is refering to @_ directly, as in  $_[0]. I do it sometimes, but by no means do I like it.

 

______crazyinsomniac_____________________________ Of all the things I've lost, I miss my mind the most. perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"