D
Dave Saville
Apologies if this appears twice but I have not seen it and my sent
posts folder does not have a copy - but I would swear I hit send
Please can someone explain why the following throws an error?
[T:\tmp]cat try.pl
use strict;
use warnings;
foo("Hello World");
exit;
{
my $bar = 1;
sub foo
{
my $a = shift;
print "$bar $a\n"; <== line 12
return;
}
}
[T:\tmp]try.pl
Use of uninitialized value in concatenation (.) or string at try.pl
line 12.
Hello World
$bar is private to foo - yes? So you can't initialize it?
posts folder does not have a copy - but I would swear I hit send
Please can someone explain why the following throws an error?
[T:\tmp]cat try.pl
use strict;
use warnings;
foo("Hello World");
exit;
{
my $bar = 1;
sub foo
{
my $a = shift;
print "$bar $a\n"; <== line 12
return;
}
}
[T:\tmp]try.pl
Use of uninitialized value in concatenation (.) or string at try.pl
line 12.
Hello World
$bar is private to foo - yes? So you can't initialize it?