in reply to vallidating a regular expression

could be somethink like this?
perl -e 'for(@ARGV){print"$_\n"if/^(\d{1,2})$/&&$1<=10}' 1 2 5 8 10 12 + 14 56