#!/usr/bin/perl -w print "1t\n" if 1; print "1f\n" if 0; print "2t\n" if 'moo'; print "2f\n" if ''; print "3t\n" if '1'; print "3f\n" if '0'; [download]
MeowChow s aamecha.s a..a\u$&owag.print
In reply to Unusual 'constant in void context' warnings by MeowChow