On Wed, Dec 01, 2004 at 02:12:58 +0200, John wrote: > Hello > > Is there any special function for that job?
personally I would use a rexex:
if ($myunknownvalue =~ m/^\d*$/)
{
print "this is a number\n";
}
else
{
print "this is some crap\n";
}
hope this helps
mat
--
Cats land on their feet.
Toast lands jellyside down.
A cat glued to some jelly toast will hover in quantum indecision
perl -e'$_=q#: 13_2: 12/o{>: 8_4) (_4: 6/2^-2; 3;-2^\2: 5/7\_/\7:\
1 m m::#;y#:#\n#;s#(\D)(\d+)#$1x$2#ge;print'
Yes, of course it's the right cabl [le0: NO CARRIER]
pgp6WSMP4ovGC.pgp
Description: PGP signature
