Re^2: Invalid argument

in reply to Re: Invalid argument
in thread Invalid argument

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!

Comment on Re^2: Invalid argument

Replies are listed 'Best First'.
Re^3: Invalid argument by suaveant (Parson) on Dec 01, 2006 at 20:40 UTC
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` [download] You can also do something like `while(my $var = shift @ARGV) { print "$var\n"; # var is scoped only in the while loop }` [download] - Ant - Some of my best work - (1 2 3)	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: Invalid argument
by suaveant (Parson) on Dec 01, 2006 at 20:40 UTC

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
[download]

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

- Ant
- Some of my best work - (1 2 3)

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom