programming-examples/perl/Subroutine/my, local and global variable.pl
2019-11-15 12:59:38 +01:00

8 lines
86 B
Perl

$value1 = 1;
my $value2 = 2;
local $value3 = 3;
print join(", ", keys %::);