Projects
Kolab:3.4
cyrus-imapd
cpmsg
Log In
Username
Password
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File cpmsg of Package cyrus-imapd (Revision 12)
Currently displaying revision
12
,
Show latest
#!/usr/bin/perl # # Usage: cat mailbox.txt | formail -s cpmsg # # where 'cpmsg' is the name of this script # # Purpose: Called by formail once for each mail message in a Berkeley- # format mailbox # #$Id: cpmsg,v 1.1 2004/02/04 12:59:42 karsten Exp $ $maildir = "$ARGV[0]"; if (!$maildir) { die "Usage: $0 $maildir"; } # Formail increments this number for each message. The # leading "0"'s must be removed (e.g. 001 becomes 1) $filenum = ($ENV{FILENO} - 0) + 1; open (OUTFILE,">$maildir/$filenum."); while (<STDIN>) { chop; print OUTFILE "$_\015\012"; # Add CRLF to each line! } close OUTFILE;
Locations
Projects
Search
Status Monitor
Help
Open Build Service
OBS Manuals
API Documentation
OBS Portal
Reporting a Bug
Contact
Mailing List
Forums
Chat (IRC)
Twitter
Open Build Service (OBS)
is an
openSUSE project
.