perl -n -e "print (( $x = $_ =~ m@^(\d+)(?{if ($^N < 255 && $^N > 233) {print  'true '}})$@ ) . '  ' )"