Help for this page

Select Code to Download


  1. or download this
    print "foo\n";
print "@{$test->{gum}}\n";
if (grep(/^$tag$/), @{$test->{gum}}){
 ...
  2. or download this
    foo
Not an ARRAY reference at line 16
foo noo goo