Help for this page
sub is_digits { my @rv = $_[0] =~ /^([0-9]+)$/; ... push @arr2, @arr1; print "There are ", scalar(@arr2), " elements in \@arr2\n"; print '$arr2[2] is ', defined($arr2[2])?'':'un', "defined\n";
There are 3 elements in @arr2 $arr2[2] is undefined
www.com | www.net | www.org
No recent polls found