--As of Thursday, April 1, 2004 9:58 AM -0500, [EMAIL PROTECTED] is alleged to have said:

Is there a simple way to reject any string that has extended characters
in  it? In other words, only accept the 88 (I think it's 88) regular
keyboard  characters and numbers. I can't find a simple way to do this.

--As for the rest, it is mine.


I'm sure there is a smart way, but here's a dumb idea:

my @characters = unpack('U*', $string);
for @characters {
   if $_ > $max_Char_Value {
       # Do something
   } else
       # Do something else.
   }
}

Daniel T. Staal

---------------------------------------------------------------
This email copyright the author.  Unless otherwise noted, you
are expressly allowed to retransmit, quote, or otherwise use
the contents for non-commercial purposes.  This copyright will
expire 5 years after the author's death, or in 30 years,
whichever is longer, unless such a period is in excess of
local copyright law.
---------------------------------------------------------------

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>




Reply via email to