print "this won't be printed\n" if (scalar @{$test} and scalar @{$test}[0]);