Perl: Zahl Vergleichsoperator

[sacko]

wieso soll ich überhaupt mit Taint arbeiten?
Ich lösche ja keine Dateien und will auch nichts evaluieren. Es kommt auch kein Userinput in Hashkeys, sondern allenfalls in Strings und die werden ja eh gequotet.

Zum regex: am besten fände ich ja einen regex, der gleich beides erledigt:
etwa so:

  
if ($zahl =~ /^(\d+>20)$/) {  
...