[Cascavel-pm] [Bulk] Re: Envio de imagem jpeg via sendmail sem módulos
Luis Motta Campos
luismottacampos em yahoo.co.uk
Quarta Abril 25 06:04:30 PDT 2007
On Apr 25, 2007, at 2:58 PM, Otávio Fernandes wrote:
> On 4/25/07, Luis Motta Campos <luismottacampos em yahoo.co.uk> wrote:
>> O MIME::Base64 é enxerido e exporta automaticamente funções para o
>> namespace alheio.
>> Isto não é considerado boa prática de programação, e eu recomendo
>> que você use assim:
>>
>> use MIME::Base64 (); # impede falta-de-educação
>
> Luis, eu não conhecia este procedimento, também reclamava disso mas
> não tinha achado uma solução ainda ... :-) Pena que ele ainda não é
> orientado ...
package Class::MIME::Base64;
use MIME::Base64 ();
use strict;
use warnings;
sub new {
return bless {}, +shift;
}
sub encode {
my ( $self, $data ) = ( shift, shift );
return MIME::Base64::encode_base64( $data );
}
sub decode {
my ( $self, $data ) = ( shift, shift );
return MIME::Base64::decode_base64( $data );
}
1; # makes perl happy
__END__
Agora é OO, também.
Escreve o POD em inglês (não sabe usar POD? "perldoc perlpod"),
constrói o pacote perl e manda para o CPAN.
Putamplexos!
--
Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,
Perl fanatic evangelist, and amateur {cook, photographer}
Mais detalhes sobre a lista de discussão Cascavel-pm