print "pre if() statement\n" if(@ARGV == 0) { my $n = 1; while() { print $n++, $_; } } print "post if() statement\n"; __DATA__ this totally works