http://qs321.pair.com?node_id=118363

Elvis has asked for the wisdom of the Perl Monks concerning the following question:

Hi,
Just for fun, I'd like to use perl instead of sed on the following line:

echo $HOME/Mail/* |sed 's/sent-mail //

So far, I've tried various things that leave me with no output or wrong output. E.g:

echo $HOME/Mail/* | perl -e 'while (<STDIN>=~s/sent-mail//) { print " +$_"}'

I've had a look at the Capturing input from pipe? node, but I'm still clueless. I've also used the s2p (sed2perl) program, but the output seems far from succint. I thought perl would be able to do the same task in as short a line as the sed command. Can it?

I'm very much a perl novice (initiate even), and would really appretiate your help.

Thank You.