Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: Another Q about piping Perl

by thatguy (Parson)
on Oct 12, 2001 at 03:20 UTC ( #118367=note: print w/replies, xml ) Need Help??

in reply to Another Q about piping Perl

I am not sure if you are trying to exclude the sent-mail folder or what.. if you are just pulling out the phrase 'sent-mail' (which will pull it out of even recieved mail) then this will work:
echo $HOME/Mail/* | perl -e 'while(<>){$_=~ s/sent-mail//;if($_){print}}'

if you just want the received mail, then you are better off with this:

echo $HOME/Mail/received | perl -e 'print <>'

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://118367]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2016-10-24 02:10 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (302 votes). Check out past polls.