[SP-pm] msg X Perl

[Eliane Franco]

O formato deste msg não é binário? Se for precisa usar o binmode...
Pq vc não usa o arquivo.eml do outlook?  Este já está convertido para Base64

[]'s
Eliane









> >> >> >>
>> >> >> >> #!c:/Perl/perl.exe -w
>> >> >> >>
>> >> >> >> use strict;
>> >> >> >> use warnings;
>> >> >> >>
>> >> >> >> my $Lista = 'Ailton.msg';
>> >> >> >>
>> >> >> >> BKP($Lista);
>> >> >> >>
>> >> >> >> sub BKP{
>> >> >> >>
>> >> >> >>  open(my $file, q{<}, $_[0]);
>> >> >> >>  foreach my $arquivo ( <$file> ) {
>> >> >> >>     chomp($arquivo);
>> >> >> >>
>> >> >> >>     print $arquivo;
>> >> >> >>
>> >> >> >>  }
>>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20100913/e66a4b23/attachment.html>