> > There are ways to fake a filehandle by tieing it to a module,
> > but that is a bit cumbersome. Looking at the Mail::Internet
> > docs it seems that you can pass it an array reference instead
> > of a filehandle ref.
> >
>
>
> Oh yeah I see that now, that may be just the ticket.
> I'll try it out and let you know how it goes.
>
> Thnaks Rob
>
> Dan
>
> > Try this, I think it will work...
> >
> > my $mio = Mail::Internet([$data]);
Sure enough, except it was all screwy if it was basically one line so I
have ot split it into line and pass that array ref.
my @data = split(/\n/, $data);
my $mio = Mail::Internet->new([EMAIL PROTECTED]);
I only wonder if havinf to split the data will goof it up because @data will look like:
Line of text
Line 2 of text
Etc etc
WHERE as STDIN wil look like:
Line of text\n
Line 2 of test\n
Etc etc\n
Maybe I need to add a \n at the end of each element in @data if I have to create that
from a a variable that has newlines?
IE :
my @data = split(/\n/, $data);
for(@data) { $_ .= "\n"; }
my $mio = Mail::Internet->new([EMAIL PROTECTED]);
Anyone happen to know off the top of their head?
I'll play around with it and see.
Thanks Rob
> >
> > Rob
> >
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
