Как сделать, вам уже ответили. Осталось объяснить почему.
Строка совпадёт с указанным вами шаблоном /[0-2]{2}/ в тех случаях, когда в любом месте такой строки попадётся последовательность двух цифр от нуля до двойки. Предложенные вами строки '22222' и '2222222222222222' удовлетворяют этому условию.
Шаблон /^[0-2]{2}$/ означает, что ни до нулей с двойками, ни после них не должно быть ничего — поэтому такому регулярному выражению будет удовлетворять строка '22', но не '22222'.
В документации по перлу есть страницы, посвящённые регулярным выражениям:
- perlre — Perl regular expressions, the rest of the story
- perlrequick — Perl regular expressions quick start
- perlreref — Perl regular expressions quick reference
- perlrebackslash — Perl regular expression backslash sequences
- perlrecharclass — Perl regular expression character classes
- perlretut — Perl regular expressions tutorial
Кстати, ваш пример можно упростить:
#!/usr/bin/perl -nlw
BEGIN { print 'Enter time: ' }
print /^[0-2]{2}$/ ? 'OK' : 'Fail';
Что означают -n и -l — смотрите man perlrun