Registriert seit: 17. Aug 2003
275 Beiträge
|
Re: [Perl] Prüfen ob Zahl aus String innerhalb eines Bereich
11. Nov 2005, 13:36
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"; }
Christoph char l[]="\xd6N\x96\xa6\xe6\xce.\xa6\xe4\xce\x04N\x86\xae\ xce\xfc",I,*i=l-1;for(;I=3,*i
++;){while(*i=*i&~(1<<I|1<<7-I)|(*i&1<<I)<<7-2*I|(*i&1<<7-I)>>7-2*I,I--);}puts(l);
|