On Mon, Sep 03, 2007 at 04:53:53 -0700, Yossi Klein wrote:

> sub c_tr {
>     my ($c) = @_;
>     return $string =~ tr/$c/$c/;
> }


Actually:

        tr/$c//;

also works, but of course it's only for characters, not actual
strings.

-- 
  Yuval Kogman <[EMAIL PROTECTED]>
http://nothingmuch.woobling.org  0xEBD27418

_______________________________________________
Perl mailing list
[email protected]
http://perl.org.il/mailman/listinfo/perl

Reply via email to