Re^3: tr///c doesn't seem to work as I expect

From perlop:

 The character "-" is treated specially and therefore "\-" is treated 
+as a literal "-".
[download]

The - indicates a range.

if($data !~ /^[\ \-\~\007\012\015\035\036\037]*$/) {
    $data =~ tr/[\ \-\~\007\012\015\035\036\037]/ /cs;
}
[download]

is probably what you need.

Comment on Re^3: tr///c doesn't seem to work as I expect Select or Download Code

Replies are listed 'Best First'.
Re^4: tr///c doesn't seem to work as I expect by AnomalousMonk (Archbishop) on Sep 04, 2009 at 23:42 UTC
One small point: In the `tr` operator, the `[` and `]` characters have no special meaning. (In a 'normal' regex, they define a character set.) In the expressison (as taken from the OP) `$data =~ tr/[\ -\~\007\012\015\035\036\037]/ /cs;` the `[` and `]` characters simply represent themselves. This has no effect in this particular case, however, since these characters are also included in the range `\ -\~` that includes, IIRC, all printable ASCII characters. (I think a space qualifies as a 'printable' character.)	[reply] [d/l] [select]
Re^4: tr///c doesn't seem to work as I expect by romandas (Pilgrim) on Sep 04, 2009 at 20:57 UTC
Thanks. Given the rest of the code (not shown), actually the range makes a lot more sense. It might not be 'correct', but I at least understand what's going on now. :)	[reply]