http://www.perlmonks.org?node_id=197087

/me narrows eyes and gets a funny grin on his face.
s/t//ig;
C'mon! what were you expecting?!?

Replies are listed 'Best First'.
Re: strip tease
by blakem (Monsignor) on Sep 11, 2002 at 22:33 UTC
    For those that like a quicker strip tease....
    tr/tT//d;

    -Blake

      In some things, faster isn't better.
        Perhaps a slower one then?
        1 while s/((.*){10})t/$1/i;

        -Blake

      Bloated!
      y/tT//d;


      ($_='kkvvttuubbooppuuiiffssqqffssmmiibbddllffss') =~y~b-v~a-z~s; print