Select Code to Download

my $i=0 , @X ;

my $i=0 , @X;
print "\@X is a global!\n" if defined $main::{X};
__END__
@X is a global!

my ($i, @X) = 0; # $i gets the zero, @X gets nothing

my $i = 0;
my @X;