in reply to Excluding non ascii characters

What about a character range? And if you want to delete those characters, you also can use tr///.

$myline =~ tr/\x80-\xff//d;

[download]

or if you want to stick to s///. 

$myline =~ s/[\x80-\xff]/ /g;

[download]

Replies are listed 'Best First'.
Re^2: Excluding non ascii characters
by ikegami (Patriarch) on Apr 06, 2009 at 19:32 UTC
    That will only remove the non-ASCII characters that are in iso-latin-1, a very small portion of non-ASCII characters. Fix: 
    # Replace with space
$myline =~ s/[^\x00-\x7F]/ /g;

# Delete character
$myline =~ tr/\x00-\x7F//cd;
$myline =~ s/[^\x00-\x7F]//g;

    [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom