Re^2: Invalid argument

[Andrew_Levenson]

Wow, I ask for advice and get an entire mini-tutorial.
THAT'S why I love it here.

Thanks for the schooling, I never knew that you could specify variables to be used in a subroutine!

[suaveant]

my and local work in any scope...

my $test = 1;
print "$test\n";
{
  my $test = 2;
  print "$test\n";
  test(3);
}
print "$test\n";

sub test {
  my($test) = @_; # parens make list assignment, otherwise you get the
+ count of items in @_
  print "$test\n";
}

#prints...
1
2
3
1

You can also do something like

while(my $var = shift @ARGV) {
  print "$var\n"; # var is scoped only in the while loop
}