mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: finestra grafica (tipo Windows) in PERL

Ciao,
qualcuno sa dirmi se esiste un modulo PERL che mi permetta di realizzare un
programma che abbia un'interfaccia grafica a finestre tipo Windows e non
ASCII tipo MS-DOS?
Qualora questo modulo esista, mi sapete dire da dove possa scaricarlo?
Grazie a tutti!!!
Silvio
--------------------------------
Inviato via 
http://usenet.libero.it

 Qualora questo modulo esista, mi sapete dire da dove possa scaricarlo?
   Dal CPAN o, se usi Activestate, con il PPM.
-- 
Alla prossima,
Marco


Grazie Marco!
Sono riuscito ad installare il modulo via PPM, ma non riesco a trovare in
internet della documentazione chiara (magari con degli esempi) che mi aiuti
ad usare il modulo WIN32::GUI.
Sapresti indicarmi dove reperire un po' d'informazioni?
Ho provato su "
http://dada.perl.it/#gui
", ma non mi sembra molto chiaro...
Grazie mille e ciao di nuovo!


 Ho provato su "
http://dada.perl.it/#gui
", ma non mi sembra molto chiaro...
Prova a scaricarti:
http://dada.perl.it/Win32-GUI-0.0.665.tar.gz
Ci troverai molti esempi. Io ho imparato da quelli.
Sempre sulla pagina del grande Aldo, troverai i link a degli archivi di 
mailing list (quella attuale e quella "vecchia").
Qui: 
http://perso.club-internet.fr/rocherl/Win32GUI.html
troverai la versione PPM della 0.665 e altro.
Delle "vecchie" faq le trovi qui: 
http://www.jeb.ca/faq/Win32-GUI-FAQ.html
nelle quali trovi altri link interessanti.
Newsgroup: it.comp.lang.perl
Titolo: Neofita e Imbranata

Salve,
uso da 2 giorni Perl per realizzare cgi-script. Ho gia' un problema :
non riesco a far girare lo script!
Uso una worstation sparc-linux con installato RedHat-Linux 6 e ho la
versione 5.005_03 di perl.
Ho creato una pagina html con un link :
<a href="hello.cgi">Stampa Hello</a>
Il file hello.cgi e' il seguente:
#!/usr/bin/perl
#
#
print "Content-type: text/html\n\n" ;
print <<EOF ;
<html>
<head><title>CGI Results</title></head>
<body>
<h1>Hello, world.</h1>
</body>
</html>
EOF
exit ;
Quando clicco sul link, mi appare il file hello.cgi cosi' come e'
scritto e non in formato html.
Ho modificato il file di configurazione srm.conf aggiungendo:
AddHandler cgi-script  .cgi
AddHandler cgi-script  .pl
ma non funziona lo stesso.
Help me, please!!!!!!!!!
Ciao
 Donatella  :)
--
Posted from [195.120.213.3] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 non riesco a far girare lo script!
Da come la vedo io è la directory cgi-bin che non è impostata
come directory di "esecuzione" del programma, ma solo come 
cartella web normale.
Però questo è un mio parere...
...per sapere come impostarla, però, devi attendere qualche responso
migliore del mio, io devo iniziare a giorni a lavorare su Linux 
e Apache! ;c)
Spero di esserti stato d'aiuto lo stesso...
Ciao!!!
-- 
((( Bazzmann Site Labs©  -- "Sounds Good, Go Better." )))
..: Internet & Comunicazione  :::  Grafica & Immagine :..
..: 
http://bazzmann.xs3.com
   :::  bazzmann(at)
tin.it
 :..
______________________________________________________________________
Leggenda narra che...
"Vi sono degli stati sociali in cui governano i piu' intelligenti:
 e' il caso dei babbuini".
( Konrad Lorenz )

non riesco a far girare lo script!
Domanda cretina: ma i permessi del file hello.cgi sono stati settati con
chmod (chmod 755 hello.cgi)?

AddHandler cgi-script  .pl
Devi anche attivare i CGI in access.conf. Trova la riga "Options"
ed aggiungi tra le altre gia` presenti anche:
ExecCGI
oppure togli l'intera riga e rimpiazzala con un pratico:
Options All
Dovrebbe bastare, spero. ;-)
	A presto, Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!
Newsgroup: it.comp.lang.perl
Titolo: Rinominare files

Salve, ho bisogno di un aiuto per rinominare dei files in un directory.
Il problema è che i nomi dei files sono di questo tipo:
xxxxx_chiave_04xxxx.ccc
le x sono in numero variabile, in pratica, qualsiasi sia il nome del file,
io devo rinominarlo con chiave_04.estesione ( il numero e di 2 cifre fisso
).
Qualche suggerimento?
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
Vedi questi script che dovrebbero fare un po' di tutto.
http://search.cpan.org/~rmbarker/File-Rename-0.01/rename.PL
http://www.perlmonks.org/?node_id=302113
http://www.perlmonks.org/?node_id=303814
ciao
gmax
-- 
  _  _ _  _
(_|| | |(_|><
  _|
http://gmax.oltrelinux.com

 gmax
-- 
questo articolo e` stato inviato via web dal servizio gratuito 


 avevo chisto nel primo mess.
Se volevi la regex, bastava chiederla chiaramente:
($new_name = $old_name) =~ s/^[^_]*_(.*_\d\d)[^\.]*(\..*)$/$1$2/;
Questa regex funziona anche se i /campi/ xxxxx sono di lunghezza nulla 
e/o la /chiave/ è di lunghezza nulla e/o l'estensione è di lunghezza 
nulla. Qui assumo però che il "." (dot) finale sia sempre presente, 
anche se l'estensione è di lunghezza nulla.
Se invece si vuole gestire anche l'eventuale assenza del ".", la regex 
diventa:
($new_name = $old_name) =~ s/^[^_]*_(.*_\d\d)[^\.]*(\..*)?$/$1$2/;
Infine assumendo ulteriori vincoli (probabilmente /reali/ ma *non* 
autoevidenti), la regex sarebbero state più brevi.
Ciao,
Emanuele.

 autoevidenti), la regex sarebbero state più brevi.
Se la volessi applicare a questi nomi files nella dir?
Naruto_-_Ep.34_-_La_sorpresa_di_Akamaru!_L'eccezionale_abilità_di_Gaara.avi
[AniMatrix_-_Sub_ITA]_Naruto_-_47_-_Davanti_alla_persona_che_ammiro!!.avi
[Anime_-_JAP]_Naruto_-_42_-_(SubITA).avi
[Anime_-_JAP]_Naruto_-_43_-_(SubITA).avi
[Anime_-_JAP]_Naruto_-_45_-_(SubITA).avi
Da queste vorrei avere:
Naruto_34.avi
Naruto_47.avi
ecc..
Come la uso la regex nello script?
Grazie


 Come la uso la regex nello script?
non hai bisogno di scriverti alcuno script: installati il modulo che ti 
ha già segnalato gmax:
http://search.cpan.org/~rmbarker/File-Rename-0.01/
e poi dalla linea di comando esegui:
file-rename.bat "s/^.*[_\.](\d\d)_.*(\.[^\.]*)$/Naruto_$1$2/"
    directory_con_i_tuoi_avi\*
(ovviamente scrivi tutto sulla stessa linea).
Se non sei sotto Win togli il ".bat", usa il corretto separatore di 
directory ed usa gli apici singoli.
Se puoi fatti prima un backup dei file, o prova prima il comando solo su 
alcuni file.
Se invece vuoi scriverti uno script, allora devi imparare come si fa, 
altrimenti non ci provare nemmeno.
Ciao,
Emanuele.

 ha già segnalato gmax:
In realtà credo che usero la regex in uno script BASH.
Grazie MILLE per l'aiuto!!
:-)

Newsgroup: it.comp.lang.perl
Titolo: Come ordinare un hash che ha come chiave dei numeri?

	Ciao, Vorrei sapere se qualcuno puo' darmi una dritta sull'ordinamento
delle hash. 
Precisamente ho il seguente problema: ho creato una hash che come
chiave ha una serie di valori numerici e tra loro c'e' una differenza
di valore 10, praticamente:
	$mia_hash->{10}=0.2;
	$mia_hash->{20}=0.4;
	.
	.
	.
	$mia_hash->{80}=0.2;
	$mia_hash->{90}=0.3;
	$mia_hash->{100}=0.4;
	$mia_hash->{110}=0.2;
	$mia_hash->{120}=0.3;
	.
	.
	.
	$mia_hash->{200}=0.8;
	.
	.
	.
se ora provo a visuazlizzare l'hash con il seguente ciclo foreach,
usando la funzione sort 
   	.
	.
	.
	foreach $valore (sort keys %$mia_hash)
	{
		print "$valore : $mia_hash->{$valore}\n";
	}
	.
	.
	.
ottengo:
10 : 0.2
100 : 0.4
110 : 0.2
120 : 0.3
.
.
.
20 : 0.4
200 : 0.8
.
.
.
80 : 0.2
90 : 0.3
|
|
|
|
|
|
+-----> cioe' mi ordina le chiavi dell'hash secondo l'ordine
"alfabetico" e non secondo il "valore" numerico delle chiavi.
Cosa devo fare per ottenere le chiavi in ordine di "valore"?
				      Grazie, matteo
 


Passa a sort la funzione da usare come funzione di comparazione:
prova
print "$valore: $mia_hash_reference->{$valore}\n"
    foreach $valore (sort { $a <=> $b } keys %mia_hash_reference);
<=>  e' l'operatore di confronto numerico. Restituisce -1 se il primo operando e'
piu' piccolo del secondo , +1 se il contrario e 0 se sono uguali. cmp e'
l'operatore analogo
pero' per  le stringhe.
------------------------------------------
Roberto Congiu
        Alchemy Communications
                LA California USA

Newsgroup: it.comp.lang.perl
Titolo: help upload script

xchč quando uplodo i miei script sul server mi da errore tipo 500 (dovrebbe
essere un errore di intrpretazione) il problema č che in locale gli script
vanno benissimo...
il server č linux e x uplodare uso sia cute che ws ftp
heeelpp ! ! ! ^_^

 heeelpp ! ! ! ^_^
Come dicevo in un precedente post è un errore del server ftp,
tipicamente del proftpd. Devi Settare il Port passivo, se usi il
cuteftp come client è una delle opzioni del tab avanzate della 
finestra connessioni.
Per essere esatti non è un errore del proftpd, il problema è
che molti client win32 non rispettano le specifiche etcniche delle rcf
ed alcuni server ftp specie se in ambiente Unix sono un po' schizzinosi.

Ti ringrazio per la risposta ^_^
xò non riesco a trovare l'opzione... (ho il cute 4.0 inglese).
saluti

...


Ti Adoro ^_^

vanno benissimo...
Hai mandato il content-type con:
print "Content-type: text/html\n\n";
? Inoltre, se usi Windoze come client, ricordati di utilizzare la modalita`
ASCII e non quella binaria per l'upload dei file.
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!
Newsgroup: it.comp.lang.perl
Titolo: Kvirc Script in Perl

Scusate ragazzi perche forse questa mail e' un po OT pero non sapevo
dove postarla,
non mi rimaneva che postarla qui!
Io sono un grande appassionato di irc e uso di solito Kvirc, ho notato
con piacere
che per personalizzare l'interfaccia grafica , le funzioni e i menu e
possibli 
utilizzare script in perl o in python.
Io sono un grande amante del perl e mi chiedevo se qualcuno di voi
sapesse come fare!
Mi chiedo come sia possibile fare interegire il client irc ( kvirc ) con
lo script!
Probabilmente ( credo ma non ne sono certo ! ) l'interazione potrebbe
avvenire tramite
opportune variabili d'ambiente ( come avviene con apache ! ) ,ma quali
sono queste 
variabili? C'e' qualcuno appassionato come me di irc e perl che sa darmi
qualche info!?
Grazie!
Un ultima cosa.. mi piacerebbe realizzare programmi a finestre ( con le
gtk ) utilizzando
il perl ( sperando che con questo sia tutto piu immediato che col C ),
io so
che questo e' possibile ma non so come! Convido in un vostro aiuto!
Grazie.
Majin
Ps. Non linciatemi se sono un po OT :P
Ps. Se non chiedo troppo rispondetemi anche nella mia email ( non
frequento molto i news! )


ha scritto:
Presente!!!
Io uso x-chat e script PERL


 Io uso x-chat e script PERL
Ho capito ,ma come si fa a farli? :))


 Ho capito ,ma come si fa a farli? :))
Per X-CHAT ho dato un'occhiata a questa pagina:
http://xchat.org/xchatdox2.html


GRAZIE :-)


Ho visto il sito ed e' ben fatto! Purtroppo pero e' in inglese:-(
E' molto interessante il modulo IRC:: ma non sono riuscito a capirlo
granke!
Tu hai gia' fatto qualche script?!
Sai dirmi qualcosa ?!
Purtroppo non e' facile capirci qualcosa di un argomento difficile
quando e' scritto
in una lingua che non conosci grake' :-(
Spero in altre info!! Ciao e ancora grazie!!
                                                    Majin

Altri aiuti e consigli sono ben accetti!!!
Comunque gradirei in particolare una secca risposta alla mia domanda!!
L'interazione script programma avviene tramite variabili d'ambiente o
cosa?
BO di solito mi pare che sia cosi pero non so sicuro!!
:-)


 BO di solito mi pare che sia cosi pero non so sicuro!! :-)
Non ho la minima idea se sia possibile utilizzare script perl in kvirc,
siccome uso xchat o bitchxl. In xchat questo č possibile, grazie a dei
moduli implementati da xchat, esempio: IRC::qualcosa
Se sei interessato a scrivere in perl xchat, e non capisci una
mazza d'inglese, scrivimi in privato (sennň mmm... siamo abbastanza OT)
ciao Static
sta...@oggi.ch

 
sta...@oggi.ch
Ok ok io ti ringrazio lo stesso ,non fraintendermi!
E non e' che non conosco una mazza di inglese.. stavo solo chiedendo!
Cmq non credo che la programmazione di script in perl qui siamo molto
OT!!
Dove dofrei postare senno?!!
bo:-)

 bo:-)
Newsgroup: it.comp.lang.perl
Titolo: Output errori

Vorrei sapere in un CGI come si fanno a stampare nel browser eventuali
errori
nello standard output oppure per stampare (sempre nel browser)
varie eccezioni d'errore per es la mancata connessione ad un DB...
esempio di CGI
#!/usr/bin/perl -w
use DBI;
print "Content-type: text/html\n\n";
my $dbh = DBI->connect("dbi:mysqlPP:database=pippo;host=localhost",'utente',
'pwd', {RaiseError => 1}) || ............................

 varie eccezioni d'errore per es la mancata connessione ad un DB...
use CGI::Carp qw/fatalsToBrowser/;
ciao
Stefano

Newsgroup: it.comp.lang.perl
Titolo: ***Get url o nome pagina****

Che voi sappiate esiste un modo per farsi ritornare la url della pagina
caricata?
Se io sto su '
http://www.pippo.com/qui/quo/qua/index.html
', esiste un
comando che mi ritorna la URL intera???
Grazie!
Paolo

!

Se usi un SSI all'interno di un HTML puoi leggere la variabile
d'ambiente DOCUMENT_URI. Se usi un CGI e vuoi sapere la pagina
in cui il client si trovava subito prima leggi invece la variabile
HTTP_REFERER. Tieni pero` conto che si tratta di dati tranquillamente
taroccabili. ;)
	A presto, Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!

Grazie, ci provo!
Sei stato molto gentile!

Newsgroup: it.comp.lang.perl
Titolo: AIUTO PER UNO SCRIPT

Salve, intanto premetto che le mie conoscenze in perl sono abbastanza scarse
ed ho appena iniziato,ho scritto per il mio sito questo script che
servirebbe per fare dei banner a rotazione andando a leggere gli indirizzi
in un file di testo.
Ho provato a lanciare lo script, in fase di compilazione non da errori ma
una volta che ha eseguito da variabili vuote.Quale è il problema?
VI ringrazio anticipatamente pre eventuali risposte
#e:\perl\bin
#apre il file counter.txt dove legge il numero della riga dell'altro file in
cui leggere
open CONTATORE, '<e:/dragons/dragonsweb/cgi-bin/counter.txt' || print
'Cannot open     counter.txt';
#assegna la prima riga alla variabile $k ->la prima riga è un numero
$k=<CONTATORE>;
#apre il file dove leggere gli indirizzi
open BANNER, '<e:/dragons/dragonweb/cgi-bin/banner.txt' || print 'Cannot
open data file ';
#assegna il file all'array @indirizzia
@indirizzi=<BANNER>;
#fa uno split sulla riga selezionata
($path,$pathimg)=split /;/, @indirizzi[$k], 2;
#aumenta $k
$k++;
#apre in scrittura il file counter.txt
open CONTATORE, '>e:/dragons/dragonweb/cgi-bin/count.txt' || print 'Cannot
open counter.txt';
#assegna la prima riga a $_
$_=<CONTATORE>;
#sostituisce le cifre nella prima riga di counter.txt con il valore di $k
s/^(\d+)/$k/;
#stampa l'indirizzo
print "(<A HREF=\"$path\"><IMG src=\"$pathimg\"></A>)";
##########################################################
#contenuto del file counter.txt
1
########################################
#contenuto del file indirizzi.txt
http://www.dragons.it
 ; 
http://www.dragons.it/Immagini/potd/imaset4.jpg

 wrote in message 8sadlg$9ja$1...@agnus.ngi.it...


 $_=<CONTATORE>;
Se l'hai aperto in scrittura, perchè cerchi di leggere?
Max

 > $_=<CONTATORE>;


Newsgroup: it.comp.lang.perl
Titolo: Perl Application, Server error


1) Don't post attachments.
2) Don't post entire scripts.
3) A server error is not a Perl problem, unless you would like to explain
what the error is.
If you're looking for a helpdesk, you've been standing in the wrong line...
Matt



If it is server problem then my program shouldn't be running either. my
perl program works fine from the same folder but this one gives error
: bad interpreter: No such file or directory
I tried it on different servers but same result.
Sukhbir


The 'bad interpreter' line reads like the first magic line in your script is bad.

 I tried it on different servers but same result.
You're the one who said it was a server problem, not me. Now that you've
started sharing some information that might give people a clue as to what
your problem is, I would guess that: a) you've got the wrong path to the
perl interpreter in the shebang line; or b) that the line endings are
incorrect and more than just the shebang line is being read. The error,
however, is definitely not a Perl error (i.e., the shell that can't find the
executable, it's not (yet) anything in the code).
Matt

what the error is.
5) And please stop crossposting to it.comp.lang.perl, unless you write in
Italian.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: ReDescent

Salve a tutti,
	ho scaricato il wiki di Oha (woha) e guardando il suo codice ho
notato il modulo Parse::RecDescent
Incuriosito da questo modulo e volendo fare delle prove ho provato a
parsare un wiki fatto in php che ho messo in un file di testo molto
molto semplice di nome recparse_wiki.txt.
Tuttavia quando eseguo il codice sotto indicato, ciò che ottengo è la
scrittura del file senza nessuna modifica e con le linee tutte di
seguito.
Quello che invece dovrebbe fare è sostituire al "=" un "<H1>" e a al
"===" un "<H3>"
Sapete dirmi dove sbaglio?
Grazie infinite.
#!/usr/bin/perl -w
use Parse::RecDescent;
my $grammar = q{
  WikiOut:Command(s) /\Z/
 
  Command:
      UgualeUno TitoloUno UgualeUno
     { print "<H1> $item[2] </H1>\n";  }
 
   | UgualeTre TitoloTre UgualeTre
     { print "<H3> $item[2] </H3>\n";  }
 
   | FraseNormale
     {print $item[1];}
UgualeUno:	/=/
UgualeTre:	/===/
TitoloUno:	/.*/
TitoloTre:	/.*/
FraseNormale: 	/^.*$/
};
my $parser = new Parse::RecDescent($grammar);
undef $/;
open F, "recparse_wiki.txt" or die "Cazzone, e il file? Errore: $!\n\n";
my $text = <F>;
$parser->WikiOut($text);
-- 
nathanvi
ICQ --> 20318568
mail --> vitto.z A_T 
tiscali.it

 notato il modulo Parse::RecDescent
ciao nathanvi.
Parse::RecDescent è una brutta bestia :-)
io sono riuscito a farlo andare con questa grammatica:
   WikiOut: Command(s)
   Command:
       UgualeUno TitoloUno UgualeUno
      { print "<H1> $item[2] </H1>\n";  }
    | UgualeTre TitoloTre UgualeTre
      { print "<H3> $item[2] </H3>\n";  }
    | FraseNormale
      { print "$item[1]\n";}
   UgualeUno:	/=/
   UgualeTre:	/===/
   TitoloUno:	/[^=]+/
   TitoloTre:	/[^=]+/
   FraseNormale: /[^\n]+/
devi fare attenzione a quello che le regexp matchano: ad esempio, se hai 
come input "===titolo===", tu facevi prima il match per /===/ 
(UgualeTre) e poi per /.*/ (TitoloTre) che, non avendo ulteriori 
informazioni ed essendo greedy, ritorna tutto ciò che trova, quindi 
"titolo===". ovviamente, in questo modo la grammatica non fa quello che 
tu vuoi che faccia.
armati di tanta pazienza e buona volontà se vuoi continuare con 
Parse::RecDescent :-)
cheers,
Aldo

 Parse::RecDescent :-)
Grazie Aldo per il prezioso aiuto.
Effettivamente funziona anche se... non avevo dubbi :-)
Volevo chiederti se eventualmente sapevi consigliarmi un altro modulo di
parser generico eventualmente più semplice anche se... credo che alla
fine il problema maggiore è capire quale regex usare e quello è un
"problema" in qualsiasi modulo di questo genere.
Aspetto conferme/smentite.
Grazie.

Newsgroup: it.comp.lang.perl
Titolo: IPW2006, aiutateci a spargere la voce!

Salve.
Mancano pochi mesi ad IPW. Vi invitiamo a partecipare (e` gratuito), a
proporre un talk oppure un argomento di discussione.
 
Ma se volete c'e` un altro modo per aiutarci: spargere la voce.
Aggiungete un banner IPW sul vostro sito, blog, pagina del LUG, ecc...
linkandolo alla pagina
 
 
http://www.perl.it/workshop
 
Abbiamo preparato banner di varie forme e dimensioni, che potete trovare
sul blog di Perl.it (sono i thumbnail, cliccateci sopra per vederli
nelle loro dimensioni reali):
 
http://www.perl.it/blog/archives/000253.html
grazie e ciao,   
Stefano
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  Italian Perl Mongers: 
http://www.perl.it

 Ma se volete c'e` un altro modo per aiutarci: spargere la voce.
sarà fatto, anzi... già fatto ;-)
ciao,
salvo
-- 
CAPaCE: Comitato per l'Abolizione della Parola Chiocciola nelle Email
to reply: cut alfa kai omega between @AT@
§alvomi©

 
http://www.perl.it/workshop
e come ogni anno replico: ma quando a Roma? spero presto

 e come ogni anno replico: ma quando a Roma? spero presto
La fattibilita` di IPW in una citta` dipende largamente dal 
supporto logistico su cui possiamo contare nella citta`
stessa. Comunque, Pisa-Roma non sara` una passeggiata, ma e`
fattibile. 
ci vediamo .)
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org/blog


Newsgroup: it.comp.lang.perl
Titolo: D: Sendmail e neofita

Ciao a tutti; premettendo che sono un discreto neofita, vorrrei
chiedervi questo: non ho trovato nulla in giro di comprensibile e
soprattutto funzionante per ciò che riguarda l'utilizzo dei form e
sendmail!
Qualcuno mi puo indicare qualcosa da vedere sul web?
anche un listato funzionante da smanettare va benissimo!!
Grazie in anticipo

anche un listato funzionante da smanettare va benissimo!!
Spero ti vada bene!
sub manda_email { 
#Queste prossime 4 istruzioni servono per avere la possibilita' di
#usare questa funzione in questo modo:
#  "manda_email("
ci...@iol.it
", "
i...@usa.net
", "Oggetto!", "come stai?")
	my $dest = $_[0];
	my $mittente = $_[1];
	my $subject = $_[2];
	my $testo = $_[3];
	$dest =~ s/\|//g; #Importante
      open (MAIL, "| $SENDMAIL $dest");
      print MAIL "Subject: $subject\n";
      print MAIL "From: $mittente\n";
      print MAIL "To: $dest\n\n\n";
      print MAIL "$testo";
      close MAIL; 
}
Ciao
Dark Wave
Newsgroup: it.comp.lang.perl
Titolo: Array

Ciao a tutti,
ho un problema nella programmazione in perl.
Come faccio a salvare un array @pippo di "n" campi in un file dati.txt e
successivamente reimportare gli stessi dati su un altro array @pluto (un
dato per ogni campo come per @pippo)?
I dati sono tutti numerici.
Grazie,
Ken


io feci una cosa simile, scrissi tutti gli elementi degli array spaziati
da un ; come il formato .csv, pure excel salva in sto formato, e
successivamente andavo a leggere tutto dentro il file e facevo uno split
di quello che aveva letto dentro il file prendendo il ; come elemnto per
la suddivisione degli elementi

"Ken ICC" <NOSPA...@inwind.itNOSPAM> ha scritto nel messaggio
news:W2EW8.14019$K_4.3...@twister1.libero.it...

open DATI, ">dati.txt";
foreach (@pippo) { print DATI $_,"\n"; }
close DATI;
open DATI, "dati.txt";
@pluto = <DATI>;
close DATI;
Ciao,
Guido.

 ha scritto nel messaggio
news:bLJW8.49957$Jj7.1...@news1.tin.it...

Grazie mille a tutti!

 close DATI;
Sinceramente non capisco perchč rileggere l'ipotetico dati.txt per
reinserire i dati in un array: @pippo, anche dopo aver stampato su file,
continua a contenere i suoi bei dati, quindi sarebbe piů veloce
(grandezza dell'array permettendo) una semplice copia di @pippo in
@pluto.
Oppure, per continuare ad usare tali dati, č sempre possibile utilizzare
@pippo anche dopo la stampa su file:
open FH, "> dati.txt";
print FH "$_\n" for @pippo;
# qui @pippo contiene ancora i dati di partenza, quindi ad esempio un:
print STDOUT "$_\n" for @pippo;
# funziona senza problemi
Il tutto sperando di aver capito quale fosse il problema!!!!!
Ciao!
E.

 Il tutto sperando di aver capito quale fosse il problema!!!!!
Il fatto è che i due array devono essere utilizzati in due momenti diversi e
ho quindi la necessità di salvare dapprima i dati su un file dati.txt e poi
successivamente, quando il programma viene lanciato per la seconda volta, i
dati devono essere riaquisiti dal sistema.
Concretamente, il file dati.txt non deve far altro che fornirmi i risultati
finali (il mio programma deve elaborare un form).
Ciao,
Ken
Newsgroup: it.comp.lang.perl
Titolo: Aiuto DBI e Oracle

Salve a tutti,
ho installato i moduli DBI per interagire con
Oracle tramite il perl e tutto funziona finchè sono utente oracle.
Se però tento di fare una cgi che lo faccia tramite web mi viene fuori
il seguente messaggio:
install_driver(Oracle) failed: Can't load
'/usr/lib/perl5/site_perl/i386-linux/auto/DBD/Oracle
/Oracle.so' for module DBD::Oracle: libclntsh.so.1.0: cannot open shared
object file: No such
file or directory at /usr/lib/perl5/i386-linux/5.00404/DynaLoader.pm
line 168.
Ripeto che tutto funziona benissimo se gli script li lancio da riga di
comando (naturalmente come utente oracle) e dunque ritengo che sia un
problema di permessi.
Avete qualche idea su come possa risolvere la cosa?
Grazie.




Probabilmente l'utente nobody sotto il cui UID vengono eseguiti i CGI non ha
visibilita' delle librerie Oracle.
Devi ricordarti che i CGI sono eseguiti dal server, di solito come utente
nobody o come un utente 'www' poco privilegiato.
Per verificare se sono problemi di environment, prova a confrontare
l'environment ottenuto dal CGI con quello dell'utente oracle.
 print "Content-type: text/plain\n\n";
 foreach (keys %ENV)
  {
     print "$_=$ENV{$_}\n";
  }
andando probabilmente a guardare robe come LD_LIBRARY_PATH.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Ti ringrazio per la risposta ma il punto è che è proprio un problema di
permessi (il server www gira come nobody), per cui dovrei trovare un
modo di accedere ad database come utente oracle.
Se non erro in altri linguaggi si può fare (Es. in Java con jdbc posso
accedere al db ma logicamente è tutto un altro discorso).
Grazie a chi mi saprà illuminare.


Newsgroup: it.comp.lang.perl
Titolo: espressione regolare in mysql

Quello che devo fare e' la seguente cosa.
Ho un db con una tabella che contiene il campo "Regione"
Poniamoci nel caso : Emilia Romagna
C'e' un form di ricerca semplice, in cui l'utente puo' inserire delle
stringhe di ricerca.
Es. l'utente inserisce Emilia
la mia query sul db (mysql)  deve restituire i record relativi alla
regione Emilia Romagna
Es. l'utente inserisce Romagna
la mia query sul db (mysql)  deve restituire i record relativi alla
regione Emilia Romagna
Es. l'utente inserisce roma
la mia query sul db (mysql)  non deve restituire i record
Come si scrive la reg exp ?
io ho usato questa: ...  `Regione` RLike '[^a-z]?stringautente[^a-z]?'
funziona se
 stringautente = romagna
oppure
stringautente = emilia
ma 
se stringautente = roma
ottengo risultati 

nessuno mi aiuta ?

 ottengo risultati 
comunque, se vuoi la parola intera, quello che cerchi e'
regione regexp '[[:<:]]stringautente[[:>:]]'
http://dev.mysql.com/doc/refman/5.0/en/regexp.html
ciao
gmax
-- 
  _  _ _  _
(_|| | |(_|><
  _|
http://gmax.oltrelinux.com
Newsgroup: it.comp.lang.perl
Titolo: Perl, DBI e i messaggi di errore

Salve a tutti,
lo script che ho fatto si connette in remoto se lo eseguo da locale,
ma se lo piazzo sul web server in rete non va e la ragione è che il
servizio è free e viene senza database.
Ho trovato un database online e da locale mi connetto senza problemi
usando lo script ma online  mi da:Connection failed: Can't connect to
MySQL server on '
www.xxxxx.org
' (13)! at 
database_lib.pl
 line 107.
E' ragionevole pensare che essendo un servizio free forse manca del
modulo DBI, ma quel messaggio di errore mi fa pensare il contrario, mi
sembra un msg di errore che sa dove volevo andare a parare.
Soprattutto quel 13 tra parentesi che significa?
Forse DBI c'è ma il servizio free blocca connessioni esterne.
Giusto per accertarmene.
Ciao e grazie

 
Ciao,
ritengo che sia impedito l'accesso da remoto e sia consentito solo da 
locahost, per cui potrai accedere al DB solo tramite uno script istallato 
sullo stesso server.
-- 
-- Marco Allegretti --
http://www.shishii.com
Newsgroup: it.comp.lang.perl
Titolo: I namespace.

Salve.
Scusate, e' possibile utilizzare in perl i namespace?
Se si' potrei avere un breve esempio oppure indicarmi qualche
risorsa in internet?
Grazie.
-- 
--
Posted from 
crux.tiscalinet.it
 [195.130.224.59]
via Mailgate.ORG Server - 
http://www.mailgate.org

Scusate, e' possibile utilizzare in perl i namespace?
package xxx;
codice;
package yyy;
altro codice
non va bene?
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *
Newsgroup: it.comp.lang.perl
Titolo: Generatore di report in linux

Mi occorre un applicativo tipo Crystal Report(Windows)
che giri sotto linux e che puņ essere utilizzato con il
perl
grazie

perl
Hai sbagliato gruppo, prova su free.it.sado.maso o alt.sex.bondage.
Sul serio, perché vuoi farti del male? E perché cosě tanto? Capisco qualche
cosetta leggera (frustino, stivali, sottommissione...), ma Crystal Report...
guarda che quella č roba pesante, rischi grosso.
Comunque mi pare che qualcosa anche ci sia, ma non so farti dei nomi. A me
sembrerebbe piů ragionevole usare uno dei tanti moduli per template, o
semplicemente la manciata di righe di codice che serve per generare un
documento latex, ma evidentemente č questione di gusti.
Il problema principale di Crystal Report č che non si limita a fare il suo
sporco lavoro, generando del codice, per poi togliersi dai piedi (come
faceva, per chi č abbastanza vecchio da ricordarlo, il generatore di report
di dBase IV), ma ha la pretesa di essere lě tutto il tempo, anche al momento
di interpretare il report (rigorosamente in codice binario proprietario) e
stamparlo.
Ti consiglio, nella tua ricerca, di orientarti verso prodotti piů
trasparenti, che limitino il loro lavoro alla produzione di codice in un
qualche linguaggio noto. E diffida di qualunque sistema di sviluppo che non
usi esclusivamente il solo formato testo (cerca, in tutti i tuoi report di
Crystal Report, l'occorrenza del campo TEL_CASA e cambialo in TEL_UFFICIO, o
cambia il formato numerico del campo SALDO, in tutte le sue occorrenze).
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: interfaccia con 7zip c'è qualcosa che la supporta?

Ambiente (linux)
 
Cercavo qualcosa per gestire la compressione 7 zip con la possibilità di 
scegliere l'algoritmo LZMA2 (multithread con possibilità di sfruttare 
più di due thread contemporanei).
 
ora in uno script lancio z7 a linea di comando, ma sono in difficoltà a
leggere lo stato di avanzamento dell'operazione e a gestire l'output
all'interno del mio script.
 
In alternativa potrei essere interessato a qualche link di esempio 
"semplificato" di sorgente in che interagisca con la lib 7z.so
 
Il codice sorgente completo del programma è troppo complesso per i mie 2 
neuroni avariati, mi vorrebbe la versione for dummyes.
 
Grazie


 
Forse non vanno bene perché LZMA ne LZMA2 ?

Newsgroup: it.comp.lang.perl
Titolo: eval "require $class";

supponiamo che per ogni particolare riga di un database voglia eseguire del
codice in particolare.
allora : in un campo del db metto il modulo pl esterno che mi interessa e
con il comando :
eval "require $class";   eseguo quel pezzo di codice. Dove in class conservo
il nome del modulo, tipo :  "/home/luca/
pippo.pl
"
il problema : 
pippo.pl
 non vede le variabili presenti nel programma in cui è
statao inglobato. cosa posso fare ?
Saluti e grazie in anticipo

basta creare una sub
ciao

non posso usare la sub altrimenti nel loop successivo la funzione "sub
pippo" è già stata definita nal loop precedente e quindi la require fallisce
cosa posso fare ?


se postassi un po' di codice, si capirebbe di + ...
comunque se 
main.pl
 contiene:
$val=5;
eval {require "
libreria.pl
"};
&stampa;
e 
libreria.pl
 contiene:
print "\$val vale $val\n";
sub stampa {
	print "Dalla sub, \$val vale $val\n";
}
perl 
main.pl
 dà:
$val vale 5
Dalla sub, $val vale 5

 Dalla sub, $val vale 5
Hai ragione, dovevo postar codice
Quello che dovevo fare era questo :
 while (my $ref = $sth->fetchrow_hashref())
     {
      if (!$check{$ref->{'parser'}})
              {
                 $check{$ref->{'parser'}}=1;
                 eval "require \"./modules/".$ref->{'parser'}.".pm\"";
              }
                eval "\$res = ".$ref->{'parser'}." (\$document);";
      }
Preferivo una soluzione  migliore, ma comunque così funziona !!
Grazie !
Newsgroup: it.comp.lang.perl
Titolo: ottenere un numero senza virgola x eccesso in perl? possibile???

Ciao a tutti,
vorrei uno script che mi modifica un numero tipo 3.59 in 4 !
La funzione int ovviamente non va'!
Mi server una funzione tipo il ceil del php, dove la posso trovare, guida?
manuali?
UN SUGGERIMENTO MAGARI??
grazie in anticipo

La funzione int ovviamente non va'!
Si, int tronca la parte decimale. Puoi usare sprintf():
$intero = sprintf("%.2f", $numero);
Questa arrotonda, quindi 3.45 diventa 3 e 3.59 diventa 4. Utilizzando
il modulo POSIX hai anche le C-like floor() e ceil():
use POSIX();
$alto = &POSIX::ceil(3.1); # Torna 4
$basso = &POSIX::floor(3.9); # Torna 3
	A presto, Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!


$n0=3,59;
$n1=int($n0+.5);  # arrotondamento a 0.5
$n1=int($n0+.9);  # arrotondamento all'intero superiore
HTH

2 precisazioni alle esaurienti risposte già date :
michele voleva dire 
$intero = sprintf("%.0f", $numero);
e gianfranco voleva dire
$n1=int($n0+1);  # arrotondamento all'intero superiore
perchè con 0.9, e $n0 = 4.09 otterresti $n1 = 4, non 5.
-- 
Posted from 
mail5.galactica.it
 [212.41.208.22] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

$intero = sprintf("%.0f", $numero);
Ehm, si, scusate. L'abitudine con le valute... ;-)

Newsgroup: it.comp.lang.perl
Titolo: Inviare a un cgi

Ho un cgi che richiede username, password, dato1, dato2.
Io volevo creare uno script che riceve dato1 e dato2 e poi invia ad un cgi
username password dato1 dato2
Il mio problema che non so come spedire l'informazioni in modo che la gente
non le veda.
Avevo pensato di usare un meta url ma poi tutte le persone possono venire a
conoscienza della mia password e della mia username come posso inviare ad un
cgi dei dati senza che le persone leggano i dati.
ESEMPIO
use CGI 'param';
$datouno = param('dato');
$dato = param('dato2');
$user = 'user'
$password = 'password'
Qui dovrei inviare a uno script 
miahost.com/cgi-bin/file.cgi?user=user....
..
print "Content-type: text/html\n\n";
print "Registrazione avvenuta con succcesso\n";
Si puň creare ?
GRazie in anticipo

 username password dato1 dato2
Due casi: CGI sullo stesso server (sotto il tuo controllo) o CGI altrui
Caso 1: inizializzi le variabili CGI con param e fai il require dell'altro
CGI. Veloce ed efficiente.
Caso 2: Usi il modulo LWP (LWP::UserAgent, HTTP::Request). Dettagli con
perldoc lwpcook
Scrivere un form HTML non serve a niente.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)
Newsgroup: it.comp.lang.perl
Titolo: Perplessita'.....

Ciao a tutti ! Mi servirebbe un aiutino:Ho realizzato una cgi in Perl
che come output mi fornisce una tabella con i dati di alcuni utenti
collegati al mio provider .... Molto piu' semplicemente richiamento il
cgi si vede una tabella con una lista di nomi e dati .... ora, per
aggiungere funzionalita' a quato script ho deciso di linkare questa
pagina ad un altro cgi. Cliccando su un nome della lista quindi richiamo
un altro CGI con tanto di parametri GET. ad es. nella pagina c'e' questo
codice:
print "<AHREF=\"infoutente.cgi?$var=$nome\">$nome</A>
Il cgi infoutente inizia con un classico codice di lettura dalla
QUERY_STRING. Poi preso il nome dell'utente da cui ricavare dati
aggiuntivi c'e' una riga che definisce una variabile con un comando UNIX
$datia_aggiuntivi=`comando unix`;
ed infine in fono al CGI c'e' il codice di formazione della pagine HTML
di output
print "<HTML>etc ... etc ...";
Ora il mio problema e' questo: siccome il `comando unix` e' piuttosto
lento (e poi non sono sicuro che il problema sia tutto li') l'otput
della pagina HTML e' costituito dai soli comandi HTML "puri", non viene
stampato nessun output di comando unix.
C'e' qualche buona anima che potrebbe aiutarmi?
p.s. ho provato a passare la query string anche con i form, ma non
funziona lo stesso .....
Grazie in anticipo.

Sicuro di aver usato le virgolette giuste quando chiami il comando
unix?
Oppure tieni presente che le cgi vengono eseguite con permessi nobody
quindi non tutti i comandi e file sono eseguibili e leggibili,
risultato la tua cgi non fa quello che dovrebbe fare...
L'idea di fondo comunque e' buona, io stesso ho adottato una soluzione
simile in un mio sito,
se ti serve altro aiuto ti do un consiglio spassionato, prova ad 
allegare anche il codice perl :)
e' + facile trovare l'errore :)
ciao
				Davide

 stampato nessun output di comando unix.
Probabilmente il tuo "comando unix" non viene eseguito o abortisce
con errore. E' anche possibile che il comando unix non sia
presente nel PATH visto dal server web, che puo' essere
diverso dal tuo PATH.
-am

Newsgroup: it.comp.lang.perl
Titolo: moduli: come conoscere le funzioni a disposizione?

Salve,
da qualche tempo a questa parte mi sto confrontando col perl e c'e' un
quesito che non ha trovato risposta.
Come e' possibile avere una lista delle funzioni che mette a
disposizione un certo modulo?
Per esempio,il man del modulo CGI e' una specie di tutorial,ma non una
bella lista di tutte le funzioni messe a disposizione con relativa
semantica,qualcosa tipo la lista delle API dei vari package di java.
Grazie a chiunque vorra' rispondermi.
-- 
**************************************
Duke Of Hell - Lord Of Chaos
Computer Science Undergraduate Student
http://www.cs.unibo.it/~tasso
**************************************

disposizione un certo modulo?
Guarda cosa esporta (@Modulo::EXPORT).
O leggi i sorgenti, che e` sempre la cosa migliore.
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *
Newsgroup: it.comp.lang.perl
Titolo: DBD::ODBC

Salve a tutti.
Sto facendo un programmino che si interfaccia con MSSQL server...
Ho utilizzato DBD::ODBC e un 4-5 query vanno a buon fine: segno che si 
collega al server e riesce a estrapolare dati.
Tuttavia c'e' una query che proprio non gli piace.
<code>
my $id_gradimento2='SELECT DOMANDA_ID, USER_ID, RISPOSTA_ID, NOTE FROM 
FAD_GRADIMENTO WHERE CLASSROOM_ID=? AND LO_ID=? ORDER BY USER_ID, 
DOMANDA_ID'
my $sth_id_gradimento;
$sth_id_gradimento=$dbh->prepare($id_gradimento2);
$sth_id_gradimento->execute($classe_id,$corso_id)
tie @tabella,'Tie::File', "tabella.csv" or die "Non posso aprire il 
file richiesto: $!";	
while(my $tabella=$sth_id_gradimento->fetchrow_hashref){
#... scrivi il file @tabella...
}
untie @tabella;
</code>
A questo punto il simpaticone pensa bene di darmi un errorino che non 
comprendo...
<errore>
DBD::ODBC::st fetchrow_hashref failed: [Microsoft][ODBVC SQL Server 
Driver]Troncamento a destra della stringa di dati. <SQL-01004><DBD:: 
st_fetch/SQLFetch <long truncated DBI attribute LongTruncOk not set 
and/or LongReadLen too small) err=-1> at c:\perl\prog\
report.pl
 line 
260
</errore>
Spero di aver ricopiato bene l'errore e di aver messo tutto il codice 
che può interessare.
Sapete darmi qualche info in più?
Non so proprio che pesci pigliare...
Grazie,
nathanvi
Inviato da 
www.mynewsgate.net

Sapete darmi qualche info in più?
Probabilmente hai uno o piu' fields troppo "lunghi" (Memo, Blob, Long,
altro) che non riesce a leggere completamente e non avendogli detto
come trattarli ti ritorna un errore. Vedi le FAQ di DBD::ODBC, ad
esempio:
====
How do I read more than N characters from a Memo | BLOB | LONG field?
See LongReadLen in the DBI docs.  
Example:
	$dbh->{LongReadLen} = 20000;
	$sth = $dbh->prepare("select long_col from big_table");
	$sth->execute;
	etc
====
'bye

 Ho utilizzato DBD::ODBC
perchè non DBD::Mysql che è più efficiente e più comodo?

 perchè non DBD::Mysql che è più efficiente e più comodo?
Non so se hai letto, ma non si collega ad un server mysql...
Ciao,
-- 
+--------+ | ASCII ribbon campaign ( ) | 
www.autistici.org/kral
|  kral  | |  - against HTML email  X  |
+--------+ |              & vCards / \ | my gpg id = 0x7C946947

 mysql...
Ops, ho letto MYSQL invece di MSSQL...
Sorry, in effetti mi sembrava strano! :-)


Non ti bastera' impostare gli attributi
LongReadLen
LongTruncOk
Se puo' essere la soluzione, cercali in
http://search.cpan.org/~timb/DBI/DBI.pm#ATTRIBUTES_COMMON_TO_ALL_HANDLES
Ciao.
Andrea

Newsgroup: it.comp.lang.perl
Titolo: DBI 1.14: Installazione

Ho scaricato il modulo DBI 1.14 d CPAN
Uso Piattaforme win32 per lo svilupo e linux per i server.
Su linux tutto OK
Su win32 no. Non riesco a compilarlo. L'errore è il seguente:
MAKE Version 5.2  Copyright (c) 1987, 2000 Borland
Error makefile 811: Redefinition of target 'Perl.c'
Fatal makefile 907: No terminator specified for in-line file operator
Ho allora installato activeperl 5.6, ho scaricato i sorgenti, perchè il file
perl.c non c'è nella distribuzione normale.
Come fare?
HELP!!
Max
Newsgroup: it.comp.lang.perl
Titolo: Stampare Query

buongiorno a tutti,
una domanda semplice
io preparo la query con lo $db->prepare("INSERT INTO aaa (a,b,c) values
(?,?,?)")
poi la eseguo, io vorrei farmi visualizzare la query con il parametro senza
effettivamente eseguire la query
db = sqlserver
grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 
Se il tuo DB supporta il meccanismo prepare/execute, il DBI invia la query cosi' come la vedi tu (con i "?").
Quindi non c'e' nulla da vedere.
Se il meccanismo non e' supportato, il DBI lo emula, completando la query e inviandola al server.
Per vedere cosa viene effettivamente inviato, usa questo codice:
DBI->trace(2);
my $sth = $dbh->prepare("INSERT INTO aaa (a,b,c) values (?,?,?)")
$sth->execute(@valori);
DBI->trace(0);
Ciao
gmax
-- 
   ____ ____  _____ _   _
  / _  |    \(____ ( \ / )
( (_| | | | / ___ |) X (
  \___ |_|_|_\_____(_/ \_)
(_____|
MySQL Certified Professional
Sapere, saper fare, fare, far sapere
http://gmax.oltrelinux.com
Newsgroup: it.comp.lang.perl
Titolo: spedire un file (.. l'ultimo giorno del mese)

salve a tutti, premetto che non so molto di perl, al quale mi
sto avvicinando da molto poco tempo.
Ho un programmino che mi prende certe linee del log file per
monitorare l'accesso ad aree protette.. il log si "azzera" ogni mese.
Siccome coloro che dovrebbero prelevarsi il file (in pratica
l'output del programma) non si ricordano di prenderselo ogni mese
e che comunque non possono farlo poco prima che il log si azzeri
ho pensato mandare una mail in automatico con in allegato il file
in questione.
Questo mi pone tre problemi:
1) come si fa in perl a dire:
"prendi il file(path) e mandalo in attach a $tizio"?
tenete conto che non ho mai fatto uno script che fa uso di
(send)mail.
2) come faccio a farlo partire in automatico?
tenete conto che non so nulla di cronjob e simili e che non
so come si settano. Ho accesso telnet, non ho accesso alla
configurazione interna del server di posta, ovviamente non
posso far girare programmi in background.
3) come specifico che deve partire "1 ora prima della fine del mese"?
grazie
--
Ciao
The Bos
the-bos#
axelweb.com
http://the-bos.axelweb.com

3) come specifico che deve partire "1 ora prima della fine del mese"?
cron dispone di moltissime opzioni, anche se non sono sicuro ci sia
anche "un'ora prima della fine del mese". ;-) Al limite non ti basta
farlo partire alla mezzanotte del primo giorno del mese? Chi vuoi
che legga l'email prima delle 5 o delle 6. ;-)
	A presto, Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!

 che legga l'email prima delle 5 o delle 6. ;-)
:-) il problema č che alla mezzanotte del primo il log.. č vuoto :-(
dicevo un ora prima perchč cosě perdevo solo un'ora di log.. e su questo
punto non so ancora come fare.
grazie mille


 punto non so ancora come fare.
Fai piu' entry nel crontab: una per i mesi di 30 giorni, una per quelli di
31 e due per febbraio.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 Cosi` sei a posto anche per i bisestili :)
mi piace il ragionamento.. potresti perpiacere buttare giu
una riga di codice perchè non so un h di cron.



Difficilmente i log vengono cancellati (soprattuto se sono log di
server web, mail o simili), ma solitamente "ruotati", ovvero il log
vecchio viene salvato con un altro nome (solitamente si aggiunge un
suffisso numerico all'estensione) ed  eventualmente compresso, solo
dopo viene azzerato. La soluzione piů semplice č di chiedere al
provider come viene chiamato il file dopo la rotazione e spedire
quello all'una di notte del primo giorno del mese.
--
Rimuovi i caratteri maiuscoli dall'indirizzo e-mail per ottenere
quello reale
Newsgroup: it.comp.lang.perl
Titolo: blocco con password dell'accesso alle statistiche del sito

Avrei un problema vorrei bloccare con password l'accesso alle statistiche
del mio sito poste nella directory cgi-bin.
Ho provato tempo fà a settare il file HTAccess, ma venivano poi bloccati i
contatori. Qualcuno sà indicarmi come posso fare?
ciao 
thanks in advance
Luca
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 contatori. Qualcuno sà indicarmi come posso fare?
Direi che potresti spostare i contatori in un posto diverso da
quello che contiene le statistiche. Ad ogni modo non sei in-topic
qui. Un gruppo migliore al quale rivolgersi potrebbe essere
it.comp.www.server (ma non ci metterei la testa).
ciao,
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it