[ale] perl regex.... again

[Pat Regan]

On Mon, 28 Feb 2011 15:38:37 -0500
Geoffrey Myers <lists at serioustechnology.com> wrote:

> > Geoffrey,
> > 
> > if ($line =~ /[^\040-\176]/) {
> > 
> >    print ("Line contains out of range characters\n");
> > 
> > }
> > 
> > keith
> 
> Does not pick up an string that contains an embedded character
> outside the range.  Say:
> 
> This is a bad ^G line.

His code should print the message for a control-g.  Can you post your
actual code and some test input that fails?

Pat