Select Code to Download

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