[Perl] Prüfen ob Zahl aus String innerhalb eines Bereichs

[BlueStarHH]

Hallo,

ich möchte herausfinden, ob eine Zahl aus einem String innerhalb eines Bereches liegt. In dem folgenden Beispiel wird die 12 aus dem String ausgeschnitten und geprüft ob sie zwischen 64 und 95 liegt. Das tut die 12 ja nicht, aber trotzdem wird "Ja" ausgegeben. Was mache ich falsch?

Code:

$a = substr('Test12', 4, 2);
print $a."\n\n";
if (($a => 64) && ($a <= 95))
  {print 'Ja';}

[ripper8472]

es heisst ">="

benutz regexes.

http://www.anaesthetist.com/mnm/perl/regex.htm

Code:

$str = 'Test12';
if ($str =~ /Test(\d+)/)
{
   print "gefunden\n";
   if (($1 >= 64) && ($1 <= 95))
   { print "zahl ist $1\n"; }
   else { print "zahl nicht >= 64 oder <= 95\n"; }
}
else { print "nicht gefunden"; }

[BlueStarHH]

Danke, das wars!