|
|
 | | Re: spamcake collection
|
| (...) Writing (...) part (...) and (...) <snipped code> How much? too much to throw out manually? Hmm (with an empty stare). Consider that spamcake directives never have parentheses surrounding them (but I've put some parenthetical lines after my (...) (25 years ago, 16-Jul-99, to lugnet.off-topic.fun, lugnet.off-topic.pun, lugnet.off-topic.geek)
| | | | | Re: spamcake collection
|
| (...) ...but does remove duplicates: BREAKAGE: while( $lineIn = <STDIN> ) { if( $lineIn =~ m/\bTom McD\b/ ) { while( $msgIn = <STDIN> ) { if( $msgIn !~ m/^>/ && $msgIn =~ m/spamcake/i ) { chomp $msgIn; $spamcake = $msgIn; while( $sigIn = <STDIN> ) { (...) (25 years ago, 16-Jul-99, to lugnet.off-topic.geek)
| | | | | Re: spamcake collection
|
| <FEzILx.C5I@lugnet.com> <378FB99F.F46CAB87@io.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit (...) Here's a better version, which... ...handles naked, quoted lines; ...outputs one spamcake per line; ...but doesn't (...) (25 years ago, 16-Jul-99, to lugnet.off-topic.geek)
| | | | | Re: spamcake collection
|
| (...) If Perl is the code of refreshment, swig on! :-, I'm not sure this will get all of them. It does introduce some non-sig text. BREAKAGE: while( $lineIn = <STDIN> ) { if( $lineIn =~ m/\bTom McD\b/ ) { while( $msgIn = <STDIN> ) { if( $msgIn =~ (...) (25 years ago, 16-Jul-99, to lugnet.off-topic.fun, lugnet.off-topic.pun, lugnet.off-topic.geek)
| | | | | The Perl Journal
|
| Woo-hoo!!!!! My 13 back-issues of The Perl Journal just came in! Just in time for my in-laws' visit! Hey -- the front cover of #5 (Vol. 2, No. 1) has Lego a Lego baseplate and a couple'a Duplofigs cavorting in a pile of rice and beans. I wonder if (...) (25 years ago, 16-Jul-99, to lugnet.off-topic.geek)
|
|
