perl -e 'if( $tmp eq 0 ) { print "In\n" } else { print "Out\n" }' Out