[ale] perl regex.... again

[krwatson at cc.gatech.edu (Watson, Keith)]

> -----Original Message-----
> From: ale-bounces at ale.org [mailto:ale-bounces at ale.org] On Behalf Of
> Geoffrey Myers
> Sent: Monday, February 28, 2011 12:59
> To: Atlanta Linux Enthusiasts
> Subject: [ale] perl regex.... again
> 
> I'll try this again as I didn't get any bites before.  I'm trying to
> come up with a perl regex that will identify a line of data that has any
> character outside of alphanumeric, punctuation, spaces, tabs.
> 
> Can't seem to formulate.
> 
> anyone?
> 
> --
> Until later, Geoffrey

Geoffrey,

if ($line =~ /[^\040-\176]/) {

   print ("Line contains out of range characters\n");

}

keith


-- 

Keith R. Watson                        Georgia Institute of Technology
Systems Support Specialist IV          College of Computing
keith.watson at cc.gatech.edu             801 Atlantic Drive NW
(404) 385-7401                         Atlanta, GA 30332-0280