next »

[dirk]

Bompa,

the empty curly braces {} mean that the string in the preceeding curly braces
shall be replaced by nothing. So the special characters will be deleted.

Dirk

[Bompa]

Bompa,

the empty curly braces {} mean that the string in the preceeding curly braces
shall be replaced by nothing. So the special characters will be deleted.

Dirk

ahhh, I finally get it. 

Bompa <--- SLOW

You have an extra curly brace cuz YOU HAVE TO in order to have braces in pairs,
whereas, if we delimit with slashes, we can use jut three.

damn!

[dirk]

Bompa,

here are some more examples:

Code:

$string =~ s/[^\x00-\x7E]//;
$string =~ s|[^\x00-\x7E]||;
$string =~ s~[^\x00-\x7E]~~;

$string =~ s([^\x00-\x7E])();
$string =~ s[[^\x00-\x7E]][];
$string =~ s{[^\x00-\x7E]}{};

Normally only three delimiters are required.

But if you use brackets you need 4 (two pairs).

[Bompa]

Using a regex you could skip all weird characters and keep only ASCII 0 - 127:

Code:

$string =~ s{ ( [^\x00-\x7E] ) }{}xmsg;   # ASCII 0 - 127

This thread is old, but may need this bump OR I'm reading the docs wrong, (which is very likely).

ASCII 0-19hex (0-31decimal) are all control characters I think.

So, to allow only printable characters and remove all others, shouldn't the basic regex be...

If the character is not 20h to 7Eh remove it.

Code:

/[^\x20-\x7E]//g;

Bompa

[perkiset]

Although I'm no good with the PERL syntax, you're right about the ASCII value for exclusion Bomps. 0..31 are indeed unprintables and control characters, although it is arguable that you might want to send a chr(7) [beep] to the printer to drive the operator insane. It's been known to happen

[dirk]

If you skip ASCII 0-19hex (0-31decimal) you would also filter tabs, line feeds and carriage returns.

This may be ok, but it depends on the purpose of the filtering.