(2[0-4]\d|25[0-5]|[01]?\d?\d)

##</code><code>##

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