cvs commit: perlfaq perlfaq9.pod
[email protected] (brian d foy)
| Newsgroups | perl.cvs.perlfaq |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 03/01/31 09:36:57
Modified: . perlfaq9.pod
Log:
* added a trailing space to the regular expression that matches
From at the beginnging of a line (which might match things like
"Fromage").
Revision Changes Path
1.15 +4 -4 perlfaq/perlfaq9.pod
Index: perlfaq9.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq9.pod,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -w -r1.14 -r1.15
--- perlfaq9.pod 6 Dec 2002 07:40:11 -0000 1.14
+++ perlfaq9.pod 31 Jan 2003 17:36:57 -0000 1.15
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq9 - Networking ($Revision: 1.14 $, $Date: 2002/12/06 07:40:11 $)
+perlfaq9 - Networking ($Revision: 1.15 $, $Date: 2003/01/31 17:36:57 $)
=head1 DESCRIPTION
@@ -557,12 +557,12 @@
=head2 How do I read mail?
While you could use the Mail::Folder module from CPAN (part of the
-MailFolder package) or the Mail::Internet module from CPAN (also part
+MailFolder package) or the Mail::Internet module from CPAN (part
of the MailTools package), often a module is overkill. Here's a
mail sorter.
#!/usr/bin/perl
- # bysub1 - simple sort by subject
+
my(@msgs, @sub);
my $msgno = -1;
$/ = ''; # paragraph reads