Dh-make-perl | gabcicala

Semplice subfunction in Perl per inviare mail

gennaio 21st, 2011 glycerin

Alla fine, durante le varie ricerche sul portale cpan sono riuscito a trovare una libreria Perl che mi permetta di inviare, in modo semplice, delle mail.
Quella in oggetto è la Mail::Sender che mi ha permesso l’implementazione di una veloce subroutine l’invio

sub sendEmail
{
 my ($to_orig, $from_orig, $subject_orig, $body_orig) = @_;
 my $new_subject = '[CHECKING] '.$subject_orig;
#     syslog('info', 'CAMPO TO '.$to_orig, time);
#     syslog('info', 'CAMPO FROM '.$from_orig, time);
#     syslog('info', 'CAMPO SUBJECT  '.$subject_orig, time);
 my $sender = new Mail::Sender({ smtp => 'IP o nome del mailserver', from => $from_orig });
 $sender->OpenMultipart({ to => $to_orig, subject => $new_subject,});
 $sender->Body;
 $sender->SendLine( $body_orig );
 $sender->Close;
}

Ovviamente non bisogna dimenticare la dichiarazione

use Mail::Sender;

Per la sua installazione su sistemi Debian ho utilizzato la utility dh-make-perl, al seguente modo:

dh-make-perl -build -cpan Mail::Sender;

Come sempre, dei feedback sono sempre graditi.

Technorati Tags: perl, dh-make-perl, Mail::Sender

Posted in Debian, Linux, News | No Comments »

Debian e CPAN: come installare pacchetti PERL usando dpkg

gennaio 21st, 2010 glycerin

Un trick molto utile per installare su di una Debian stable dei pacchetti CPAN è mediante l’utilizzo della utility dh-make-perl che permette di creare un “.deb” del pacchetto da installare. In questo modo la libreria CPAN viene trattata alla stessa stregua di un normale paccheto Debian e quindi mediante dpkg.

Come primo step bisogna installare il pacchetto dh-make-perl:
host:~# aptitude install dh-make-perl

dopodichè si passa al download e creazione del “.deb” (ad esempio della libreria Apache::LogRegex):
host:~# dh-make-perl –build –cpan Apache::LogRegex

una volta fatto il pacchetto si passa alla sua installazione:
host:~# dpkg -i libapache-logregex-perl_1.5-1_all.deb

Nella directory di compilazione compariranno le seguenti directory e pacchetti che è poi possibile cancellare:
host:~# ls -latrh
-rw-r–r– 1 root root 4.5K 2010-01-21 18:45 libapache-logregex-perl_1.5.orig.tar.gz
drwx—— 6 root root 4.0K 2010-01-21 18:45 Apache-LogRegex-1.5
-rw-r–r– 1 root root 8.2K 2010-01-21 18:45 libapache-logregex-perl_1.5-1_all.deb