in reply to can someone help me?
perl -le '$cat = "cat"; if ($cat =~ /\143\x61\x74/) { print "Its a cat +!\n"; } else { print "Thats a dog\n"; }'
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: can someone help me?
by simonm (Vicar) on Mar 18, 2004 at 21:19 UTC |