gen
21

Semplice subfunction in Perl per inviare mail

 

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

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

Ovviamente non bisogna dimenticare la dichiarazione

<br />use Mail::Sender;<br />

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

<br />dh-make-perl -build -cpan Mail::Sender<br />

Come sempre, dei feedback sono sempre graditi.

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

Share

Related posts:

  1. Debian e CPAN: come installare pacchetti PERL usando dpkg
  2. Spedire una mail con un allegato testo via shell Linux
  3. Too many open files

Articoli correlati elaborati dal plugin Yet Another Related Posts.

Popularity: unranked [?]



Puoi visualizzare il post originale qui.

lug
30

Rakudo Star, la prima versione usabile di Perl 6

 

Il team di Rakudo e Perl 6 hanno annunciato Rakudo Star, quella che viene definita la prima distribuzione utilizzabile di Perl 6.

Questa versione è dedicata agli early adopter che vogliono toccare con mano le nuove funzionalità del linguaggio. È presente la versione 6 del compilatore Rakudo Perl, la versione 2.6.0 della virtual machine parrot e moduli per Perl 6 come XML::Writer, MiniDBI, SVG, Term::ANSIColor e LWP::Simple.

Rakudo Star non comprende ancora tutte le funzionalità previste per Perl 6, manca, infatti, il supporto per typed array, macro, binary object, thread, non-blocking I/O e concorrenza. Gli sviluppatori continueranno ad aggiungere le caratteristiche mancanti nelle future versioni. La prossima è pianificata per il 24 agosto.

Via | HOnline

Rakudo Star, la prima versione usabile di Perl 6 é stato pubblicato su ossblog alle 10:00 di venerdì 30 luglio 2010.

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

lug
20

Meteor

 

Meteor è un web server realizzato per offrire agli sviluppatori la possibilità di integrare stream di dati all’interno delle proprie pagine senza richiedere l’aggiornamento dell’intera pagina.

Il sistema, in realtà, è composto dal server e da una libreria javascript che si occupa di astrarre la gestione della ricezione dei dati. Le caratteristiche principali di Meteor sono la capacità di gestire un alto numero di connessioni longeve e concorrenti. È presente, inoltre, un sistema di cache in memoria per gestire l’invio di un determinato evento a migliaia di client in tempo reale.

Sul sito potete approfondire le modalità di integrazione o le tecniche per utilizzarlo nei browser. Meteor è scritto in Perl e rilasciato sotto licenza GPLv2.

Via | Meteor

Meteor é stato pubblicato su ossblog alle 13:00 di martedì 20 luglio 2010.

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

apr
25

Gitolite

 

Gitolite è un gatekeeper basato su ssh per la gestione di repository ssh.

Il progetto consente di utilizzare una normale chiave ssh per l’accesso autenticato ai repository Git e permette agli amministratori del sistema di decidere in maniera precisa chi può accedere a quali rami e con quali permessi.

Il progetto si presenta come molto utile sia in ambito lavorativo sia per chi non ha la possibilità di creare utenti aggiuntivi per ogni sviluppatore che partecipa al progetto. È scritto in perl e rilasciato sotto licenza GPLv2.

Via | Gitolite

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

gen
21

Debian e CPAN: come installare pacchetti PERL usando dpkg

 

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

Technorati Tags: PERL, CPAN, dh-make-perl, dpkg

Share/Bookmark

Related posts:

  1. Debian Squeeze verrà rilasciata nell’estate 2010 Steve McIntyre, Project Leader ha deciso di rilasciare la versione…
  2. Debian Lenny e l’ambiente Java La procedura per poter installare l’ambiente Java su di una…
  3. Debian Lenny e il firmware della Broadcom bnx2 Il firmware della Broadcom bnx2 risulta essere proprietario e quindi…

Articoli correlati elaborati dal plugin Yet Another Related Posts.

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

dic
01

Trovare i file che contengono due parole.

 

Metodi scaturiti da un thread su Erlug.

BASH

grep -l stringa1 * | xargs grep -l stringa2

o meglio

grep -lZ stringa1 * | xargs -0 grep -l stringa2 )

oppure

comm -1 -2 <(grep -wl stringa1 * | sort) < (grep -wl stringa2 * | sort)

Note:
Il parametro -l del comando grep nasconde il normale output e visualizza solo il nome dei che contengono il pattern ricercato.

Il parametro -Z del comando grep inserisce un carattere NULL come carattere conclusivo di ogni nome file da visualizzare: viene usato in caso l output di grep debba essere passato a qualche altro comando (nell esempio xargs)

Il comando comm confronta due file ordinati linea per linea.

Il parametro -1 del comando comm esclude dall output le linee uniche del primo file

Il parametro -2 del comando comm esclude dall output le linee uniche del secondo file

PERL

perl -n0e 'if(/stringa1/&&/stringa2/){print "$ARGV
"}' *

AWK

awk FNR==1{stringa1=0;stringa2=0}
/stringa1/{stringa1=1}
/stringa2/{stringa2=1}
stringa1 && stringa2 {print FILENAME; nextfile}' *

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

nov
17

TTYtter: aggiornare Twitter e identi.ca dalla shell

 

TTYtter TTYtter è un’applicazione per aggiornare lo stato di Twitter (od, opzionalmente di identi.ca/StatusNet) da shell: consiste in un semplice script di Perl – aggiornato il 25 settembre scorso alla versione 0.9.8 – col quale è possibile interrogare la public timeline dei principali servizi di microblogging.

TTYtter si “appoggia” alternativamente al browser testuale Lynx o, a cURL – la soluzione che preferisco – e consente connessioni di tipo SSL sfruttando il metodo JSON per le richieste al server remoto.

Non si tratta di un client particolarmente comodo, ma può rivelarsi un curioso divertissement geek per chi volesse provare nuove soluzioni: la configurazione è semplice (bastano username e password) e può essere salvata in un file .ttytterrc nella home del proprio utente.

Popularity: unranked [?]



Puoi visualizzare il post originale qui.

ott
19

Italian Perl Workshop: 22 e 23 ottobre a Pisa

 

Il 22 e 23 ottobre si terrà a Pisa l’Italian Perl Workshop, evento no profit, presso la sede del Centro Nazionale delle Ricerche.

Saranno presenti ospiti internazionali tra cui:

  • Tim Bunce: autore di vari moduli come DBI, DBD::Oracle, Devel::NYTProf e speaker di rilievo nella maggiori manifestazioni dedicate all’open source
  • Thomas Fuchs, creatore di script.aculo.us (famoso framework Javascript), core developer di Prototype e di Ruby on Rails.
  • Amy Hoy, esperta di user interaction e product design, relatrice ad OSCON ed ad altri workshop e conferenze
  • Mike Whitaker (Penfold) è un membro della comunità Moose e ha tenuto vari talk in altri workshop su Moose e su Perl
  • Jonathan Worhington: core developer del compilatore Perl 6 Rakudo e della virtual machine Parrot.

L’evento è gratuito ed è sufficiente registrarsi sul sito per avere diritto a:

  • partecipare a tutti gli interventi
  • ricevere i gadget degli sponsor
  • 2 coffee break giornalieri
  • attestato di partecipazione (su richiesta)
  • accesso all’asta finale dove verranno regalati i premi degli sponsor

Share/Bookmark

Popularity: unranked [?]



Puoi visualizzare il post originale qui.

ott
09

Italian Perl Workshop 2009

 

Il 22 e 23 ottobre a Pisa si terrà l’Italian Perl Workshop, evento no profit, presso la prestigiosa sede del Centro Nazionale delle Ricerche.

Saranno presenti molti ospiti internazionali anche non legati direttamente al mondo di Perl. Tra i confermati:

  • Tim Bunce: autore di vari moduli come DBI, DBD::Oracle, Devel::NYTProf e speaker di rilievo nella maggiori manifestazioni dedicate all’open source
  • Jonathan Worhington: core developer del compilatore Perl 6 Rakudo e della virtual machine Parrot.
  • Thomas Fuchs, creatore di script.aculo.us (famoso framework Javascript), core developer di Prototype e di Ruby on Rails.
  • Amy Hoy, esperta di user interaction e product design, relatrice ad OSCON ed ad altri workshop e conferenze
  • Mike Whitaker (Penfold) è un membro della comunità Moose e ha tenuto vari talk in altri workshop su Moose e su Perl

L’evento è gratuito ed è sufficiente registrarsi sul sito per avere diritto di:

  • partecipare a tutti gli interventi
  • ricevere i gadget degli sponsor
  • 2 coffee break giornalieri
  • attestato di partecipazione (su richiesta)
  • accesso all’asta finale dove verranno regalati i premi degli sponsor

Se qualcuno volesse supportare l’organizzazione si può comprare un biglietto Supporter da 50€ che darà diritto a ricevere anche una maglietta e la tessera dell’associazione Perl.it.

Via | Perl.it

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

ago
30

Perl: Upload su rapidshare da linea di comando

 


Potete eseguire upload su rapidshare.com direttamente da linea di comando con lo script perl che trovate all URL:
http://images.rapidshare.com/software/rsapi.pl

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

ago
20

Interfaccia grafica per XAMPP piattaforma di sviluppo web/database.

 

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

ago
14

Perl6, in arrivo a primavera?

 

PerlPatrick Michaud ha confermato sul suo blog che Perl 6 potrebbe essere rilasciato nella primavera del 2010, probabilmente aprile.

Patrick è il release manager per la release Rakudo del compilatore perl 6 disegnato per girare sulla macchina virtuale Parrot. La versione che uscirà in primaverà, però, non avrà tutte le novità promesse, ma si tratterà di una versione stabile per consentire alla gente di iniziare ad usare il prodotto

Forse una mossa per smuovere le acque di un progetto che si trascina da anni senza arrivare ad una versione definitiva per gli utenti.

Via | Perl

Popularity: unranked [?]



Puoi visualizzare il post originale qui.

giu
12

Convertire un file da xls a csv da linea di comando

 

Eseguire i comandi seguenti (sostituire [STRINGACASUALE] con quella che troverete nella vostra cartella build):

cpan -i Spreadsheet::ParseExcel
cpan -i Spreadsheet::Text::CSV_XS
cp ~/.cpan/build/Spreadsheet-ParseExcel-0.49-[STRINGACASUALE]/sample/xls2csv.pl /usr/local/bin/
chmod +x /usr/local/bin/xls2csv.pl

Lanciate la conversione con il comando:

xls2csv.pl nomefile.xls [COLONNA1][RIGA1]:[COLONNA2][RIGA2]

es:

xls2csv.pl test.xls A1:G2

Se volete indicare anche il foglio di lavoro da esportare dovete usare la sintassi seguente:

xls2csv.pl nomefile.xls [FOGLIO]-[COLONNA1][RIGA1]:[COLONNA2][RIGA2]

es:

xls2csv.pl test.xls 1-A1:G2

L output viene visualizzato a video. Se il risultato vi soddisfa potete ovviamente salvarlo su file mediante redirezione dello standard output:

es:
xls2csv.pl test.xls A1:G2 > test.csv

Se il file xls contiene caratteri accentati o il simbolo dell Euro, probabilmente riceverete la segnalazione seguente:

Wide character in print at ./xls2csv.pl line 44.

e i caratteri accentati / simboli saranno sostituiti da arcani simboli.

Potete risolvere la cosa aggiungendo la linea

use utf8;

nei pressi delle altre clausole “use” all interno del file xls2csv.pl

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

giu
12

Perl: elencare i moduli installati

 

Per sapere quali moduli perl sono stati installati sul sistema potete lanciare il comando:

instmodsh

Vi appare un menu, e il prompt cmd.
Digitando la lettera L ottenete la lista dei moduli installati.
Digitando la lettera Q uscite dal programma tornando alla shell.

Popularity: unranked [?]



Puoi visualizzare il post originale qui.

set
13

Processi sotto controllo con PSMon

 

PerlPSMon è una programma/modulo scritto in Perl per la gestione di processi e demoni, capace di notificare eventi sia a syslog sia tramite mail. Potete specificare cosa eseguire, quanta CPU e RAM assegnare durante l’esecuzione ed anche quante istanze devono essere avviate: PSMon si assicurerà che questi processi stiano effettivamente funzionando, terminandoli se dovessero iniziare ad utilizzare troppe risorse o riavviandoli nel caso dovessero bloccarsi.

La sintassi del file di configurazione è simile a quella di Apache, pertanto il setup non dovrebbe rappresentare uno scoglio nemmeno per quei sysadmin con meno esperienza.

via | Linux.com

Popularity: 1% [?]



Puoi visualizzare il post originale qui.

top