- or download this
#!perl -w
...
# breaks into :
# Use of uninitialized value in print at test.pl line 6.
- or download this
print join ('|', @c);
# results in: # % ( / 3 6 7 @ B C G Q R ^ s t ~
- or download this
Possible attempt to put comments in qw() list at test.pl line 4.