Hi:  Well, here's a success:
#! /usr/local/bin/perl -w

# Simple program to prepare an email message for entry into a database
# This program simply discards header information, and prints message
# body. It assumes a specific number of lines for $header, which in my case
# is 5. The range operator is used to discard the first five lines and print 
# line 6 to the eof.    
use strict;
my $file = '../perlStuff/email.txt';

open (IN, "<$file") or die "Can't open $file: !$\n";
while (<IN>) {
    if (6 .. eof){ print; }
}
close IN;

As a way to explain this truly inane preoccupation with creating a simple 
script for email message body, only, the idea was to move message data into a 
database for information management.  Now that I've spent several days, I 
have to ask:
Do folks automate the email to database process, so that a single search for 
information in a database also includes a search of one or more email 
account[s] as well?  I guess it's like a system-wide keyword search, sort of 
like Google's Internet-wide search capability?  Does that make any sense?
Thanks,
Tom

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to