Plankton@linux:~/perl/perlmonks> ./tilda_q.pl
Useless use of not in void context at ./tilda_q.pl line 18.
WooHoo
WooHoo
HooHoo
WooHoo