in reply to Why does this have strange results.

                             |
                             V
    $compressed =~ s/\\:/x01/g;
                             ^
                             |

[download]
g means global

In Section Seekers of Perl Wisdom