How hard would it be to create a temporary variable where you store the
contents of the file?
################
my $data;
open(INFILE,"<my_file.txt") or die "Couldn't open file for reading!\n";
while(<INFILE>){
$data .= $_;
}
# OR ###########
while(my $ref = $sth->fetchrow_hashref()){
$data .= $ref->{COLUMN};
}
################
Then you can use $data in your initialization statement.
-----Original Message-----
From: Charles Farinella [mailto:[EMAIL PROTECTED]
Sent: Monday, July 25, 2005 2:10 PM
To: Perl Beginners
Subject: RE: MIME::Lite message text
On Mon, 2005-07-25 at 16:46, Tim Johnson wrote:
> Looking at the documentation, it looks like what you want is the Data
> field when you initialize your message.
>
> Data => "whatever";
That's true, but what I need is either:
Data => "<whatever_filename";
or
Data => "< the results of about 6 $sth->fetchrow_arrays"
I don't know how to do either, unfortunately.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
