mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: rINC ?

salve a tutti!
Ho ActivePerl su WinME
non riesco assolutamente ad installare nuovi moduli
ho provato:
1) a scaricare da CPAN, ma una volta scompattati i files li inserisco in
/lib , ma non so come aggiungere il percorso ad @INC
2) a scaricare da Activestate, poi dare ppm install modulo.ppd
ma compare un errore (Could not locate ppd file for this platform ...Grrr!)
3) mi potete dare una mano?
1000 grazie
Rik
PS ho sempre resistitito a chiedere al nwsgrp un aiuto arrangiandomi da
solo, ma ora non so come andare avanti :-(
... esiste un nwsgrp solo per principianti dove fare domande scemissime?
++++++++++++++++++++++++++++++++++++++++
+  capt. Riki- master of Mechs
+  
http://webpages.canyoufind.it/rik
+
++++++++++++++++++++++++++++++++++++++++

# da prompt di msdos
C:\> ppm
PPM interactive shell (x.x.x) - type 'help' for available commands.
PPM> search WWW::Search
Packages available from 
http://ppm.ActiveState.com/cgibin/PPM/ppmserver.pl?urn:/
PPMServer:
WWW-Search            [2.15] Virtual base class for WWW searches
WWW-Search-AlltheWeb  [1.5 ] class for searching AlltheWeb
# ecc...
PPM> install WWW-Search
Install package 'WWW-Search?' (y/N): y
Installing package 'WWW-Search'...
# ecc...
PPM> quit
Quit!
C:\> perl -e "use WWW::Search"
C:\> 	# niente errore il modulo dovrebbe essere ok ...oppure....
Can't locate WWW/Search.pm in @INC (blah blah blah ...)	# ops, qualcosa è andato storto
nel caso : PPM> help install .... PPM> help search
-- 
Posted from qmailr@[195.223.140.135] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

ma non è possibile installare dei moduli su windoze senza utilizzare
ppm? 

se non c'č nulla da compilare, scompatti e copi in una dir
di @INC , ma a quel punto ppm non sa nulla del modulo,
niente verifiche, aggiornamenti, ecc.. sta a te.


Newsgroup: it.comp.lang.perl
Titolo: Spedire da un form un'email con attach... si può?

Compili un form, alleghi un file, e spedisci l'email con l'allegato senza
salvarlo sul server. E' possibile?
Ho cercato in giro e ho letto del MIME::Lite, qualcuno può darmi maggiori
delucidazioni?
gracias! :)
--
'Occorre morire per dare un senso al destino
 Ma bisogna nascere per conoscere il chiarore del proprio mattino'

 wrote in message 8qn5f9$hc2$1...@serv1.iunet.it...

Newsgroup: it.comp.lang.perl
Titolo: Invio Mailing List in perl?

");
	$mail->header("Subject", "Mail");
	$mail->content($TESTO_MESSAGGIO_EMAIL);
	$response = $ua->request($mail)->as_string;
(o se avete qualche metodo migliore, consigliate pure)
- passa al messaggio successivo
--------------------------
Ora ho questi dubbi:
Come faccio a sapere se tutti i messaggi sono stati inviati o se c'č
stato qualche errore? E su che indirizzi?
Siccome gli indirizzi sarebbero parecchi (oltre 5000) ha poco senso
aspettare che il programma abbia ricevuto la risposta dal mailserver,
č possibile far partire l'invio del nuovo essaggio senza aspettare
l'ok dal precedente (diciamo una specie di multithread fino a 10
connessioni in contemporanea)?
Grazie
Andrea Busia

On Fri, 17 Sep 1999 11:49:38 GMT, 
bu...@tiscalinet.it
 (Andrea Busia)
wrote:
| č possibile far partire l'invio del nuovo essaggio senza aspettare
| l'ok dal precedente (diciamo una specie di multithread fino a 10
| connessioni in contemporanea)?
forse dico una bestialita', ma non potresti preparare dei files pronti
da spedire a sendmail con uno script chiamati *.todo
quindi fai uno script che cerca il primo *.todo, gli cambia il nome in
*.done e lo spedisce
ed esegui in bg 10 copie dello script?
Oha

connessioni in contemporanea)?
Questo e` piu` che altro un problema di sendmail. Visto che devi mandare
comunque tanti messaggi ti conviene comunque eliminare sendmail a favore
di postfix (
http://postfix.linux.it
).
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *

ed esegui in bg 10 copie dello script?
Con qualche accorgimento potrebbe funzionare, anche se bisognerebbe
evitare in maniera un po' più sicura l'invio di più di un messaggio a
un singolo utente (nel caso di accesso contemporaneo di due dei
programmi), è proprio per questo che avrei preferito un programma che
facesse tutto da solo (sempre se è possibile) senza far partire
diverse copie dello script.
Ciao
Andrea

di postfix (
http://postfix.linux.it
).
Cosa ha di meglio, di diverso?
L'ho scaricato ma non ho trovato all'interno neppure un readme che
dica quali sono le sue qualtà.
Ciao
Andrea

dica quali sono le sue qualtà.
Guarda il sito.


Newsgroup: it.comp.lang.perl
Titolo: Un buon libro sul Perl

Salve ragazzi, volevo avvicinarmi pian pianino alla programmazione in Perl,
e volevo farlo con l' aiuto di qualche libro. Voi che mi consigliate?
Qualcosa di non troppo completo (tipo gli "tutto&oltre" di Apogeo), dal
costo piuttosto contenuto, ma che non spieghi cmq solo banalitą (un po' di
programmazione in altri linguaggi l' ho fatta). Grzie mille
Alessio
per rispondere togli _yatta_
--
Se un uomo con una pistola
incontra un uomo con un fucile,
l' uomo con la pistola č un uomo morto
                          --Ramon Rojo

 --
Se non hai problemi di inglese è ottimo, a mio parere, "Learning Perl" di
Randal Schwartz & Tom Phoenix (3° ed.) edito da O'Reilly. Io l'ho preso da
Amazon.
ciao
Newsgroup: it.comp.lang.perl
Titolo: glade e windows

Salva a tutti,
	sto cercando di avvicinarmi alla interfaccia grafica con perl ed
ho scoperto GLADE. Ottimo strumento davvero mi ha permesso di creare una
finestra in meno di 5 minuti...
Certo, adesso capire come funzionino gli eventi è tutta un'altra cosa
soprattutto perchè non ho precedenti con nessun linguaggio. Ma questo
verrà col tempo. Spero :-)
Volevo chiedere al nresgroup se i programmi generati con GLADE sono
portabili anche su windows...
Ho visto infatti che sul sito dice che genera programmi per le GTK+ e
GNOME...
Ora... le GTK+ si possono mettere anche su windows ma... GNOME?
Posso usare le finestre generate con glade anche su windows?
Grazie mille per le info
-- 
nathanvi
ICQ --> 20318568
mail --> vitto.z A_T 
tiscali.it

 portabili anche su windows...
Solo se si usano componenti GTK: i componenti sotto GNOME non sono
portabili su molte piattaforme.
Ciao,
 Emmanuele.
-- 
Emmanuele Bassi (Zefram)                 [ 
http://www.emmanuelebassi.net
 ]
GnuPG Key fingerprint = 4DD0 C90D 4070 F071 5738  08BD 8ECC DB8F A432 0FF4

 fa avere revisioni e correggere i propri errori). :-)
Volentieri :-)
Però prima devo capire una cosa fondamenrtale.
Le GTK2 sono sia per windows che per linux?
Se imparo ad usare questo modulo posso esportare gli eventuali programmi per entrambe le piattaforme?
Come mai su activestate, facendo un ppm search gtk non trova nulla?
Forse devo installare le librerie prima in altro modo?
Grazie per le risposte :-)

 Come mai su activestate, facendo un ppm search gtk non trova nulla?
Ciao Nat, ecco i PPM per ActiveState Perl, Win32:
http://homepage.ntlworld.com/wayne.keenan/gtk/

 Forse devo installare le librerie prima in altro modo?
Su activestate non ci sono; devi scaricare il Runtime Environment delle
GTK, e poi cercare i moduli su CPAN.
Devi cercare negli archivi della mailing list, dove sono passati i link
per poter utilizzare le GTK+ 2.x sotto Windows.
 
http://lists.gnome.org/archives/gtk-perl-list/


Newsgroup: it.comp.lang.perl
Titolo: [Digiuno...] Perl e Personal Web Server

Ok, ho installato il PWS di Win98 ed ho creato una cartella "cgi-bin" nella
root del server... ho pure installato ActivePerl nella sua ultima
versione... La mia "assoluta ignoranza in materia" supponeva che già questo
fosse sufficiente a far eseguire gli scripts, ma evidentemente si
sbagliava... Insomma, che devo fare, in dettaglio?? Qui non funziona nulla!
Aiutooo!!! (e grazie a coloro che mi risponderanno)
******************************
IvanHalen
E-mail: 
ivan...@tin.it
 / 
ivan...@tiscalinet.it
Home Page: 
http://www.ivanhalen.com
ICQ: 18010589

IvanHalen wrote:


la cgi-bin deve essere in modalità esecuzione, questo lo puoi vedere dalla
amministrrazione di PWS...
Poi dovresti andare nel registo e modificare da qualche parte... se non
sbaglio hkey_local_machine > system > w3svc > current control set > script
map e devi inserire una stringa .pl e dargli ilpercorso di perl.exe (ad
esempio "c:\perl\perl.exe %s %s) ricordati di inserire %s %s...
é un po' un casino, se non sei esperto non andare a toccare il registro,
rischieresti di fare grossi pasticci!
Alex
Newsgroup: it.comp.lang.perl
Titolo: help me

help me cgi nascondi pagina
Cerco script in cgi che mi permetta di nascondere l'origine del link di una
pagina.
Mi spiego:
devo linkare una pagina tipo 
http://www.pippo.it/pippo.html
Devo linkare dal sito 
www.sito.it/cgi/
 lo script cgi che mi porti su
http://www.pippo.it/pippo.html
ma che NASCONTA ALL'UTENTE IL LINK 
http://www.pippo.it/pippo.html
In parole povere l'utente visitando questa pagina
http://www.pippo.it/pippo.html
non deve sapere in nessun caso il link della pagina.
Mi puoi aiutare
scrivimi a 
arch...@yahoo.it
ti ringrazio
Luigi Datore

 una pagina.
ci sono varie soluzioni, se usi apache ti consiglio di dare un'occhiata a 
mod_rewrite e a mod_proxy.
altrimenti puoi fare una cgi che fa da proxy usando la LWP.
http://www.perldoc.com/perl5.6.1/lib/lwpcook.html#GET
-- 
~ Federico Feroldi
yahoo! engineer team

 ha scritto nel messaggio
news:CpqK7.134384$sq5.6...@news.infostrada.it...


Newsgroup: it.comp.lang.perl
Titolo: Ordinamento file e pattern match

Ciao a tutti,
ho un file di testo cosi' fatto:
 
home/ale/prog/game/doom.txt
/home/ale/prog
/home/ale/pub
/home/ale
e vorrei rovesciarne l'ordine cosi':
/home/ale
/home/ale/pub
/home/ale/prog
/home/ale/prog/game/doom.txt
Inoltre,dovrei eseguire un "pattern match" su
tutti i file contenuti in esso.
Qualcuno puo' aiutarmi,per favore ?
Ciao e grazie!
Alessandro

 
$file = "il_tuo_file.txt";
# ci slurpiamo il file...
open F, $file; @righe = <F>; close f;
# lo rovesciamo...
open F, ">$file";
map { print F $righe[$#righe-$_] } (0..$#righe);
close F;
# applichiamo regexp al contenuto dei file
$REGEXP = '\bpippo\.(com|net)';
for $file(@righe) {
   if (-f $file) {
      open F, $file;
         while (<F>) {
            if ( /$REGEXP/o ) {
               push @found, $file;
               last;
            }
         }
      close F;
    }
}
Più o meno, qualcosa del genere...
Newsgroup: it.comp.lang.perl
Titolo: Scaricare la posta

Salve a tutti,
Sto' cercando di automatizzare una procedura di scaricamento della posta.I
passi implementati sono:
1.)Collegamento al Server di Posta
2.)Autenticazione
e fin qui nessun problema con i vari script che fanno uso del modulo
NET::POP3
Una volta dentro, vorrei scaricare la posta che risiede su di un' altro
mio account, utilizzando l'opzione WEB - 'POSTA DA ALTRE CASELLE'.
Grazie a tutti per la collaborazione.
 
 

mio account, utilizzando l'opzione WEB - 'POSTA DA ALTRE CASELLE'.
Il problema è che, con Net::POP3 e la procedura da te indicata, sei
"dentro" un server POP3, che, per definizione, non può fornire il
servizio "Web - posta da altre caselle". In breve, non puoi fare
quello che vuoi in questo modo. Puoi scaricare solo la posta presente
nella casella postale a cui accedi.
Per la verità, non si capisce neanche molto bene perché tu voglia fare
in questo modo: non è più semplice accedere direttamente all'altro
account, nello stesso modo in cui accedi al primo?
Altrimenti, dovrai collegarti all'interfaccia Web della tua posta (con
LWP, Net::HTTP o chi per loro), e simulare quello che faresti con un
browser.
Ciao.

Il problema e' che avendo cambiato fornitore di connettivita', non riesco
piu' ad accedere alla vecchia casella di posta, per effetto della
limitazione imposta dai Provider come TIN, Libero etc.etc.
Grazie 1000.

limitazione imposta dai Provider come TIN, Libero etc.etc.
Se ti è consentito di accedere alla casella con protocollo POP3, puoi
farlo con uno script che usi Net::POP3, altrimenti no. Da un server
POP3 non si può ritirare la posta di competenza di un altro server
POP3 (a meno che in mezzo non ci sia qualche genere di remailer che
trasferisce la posta da uno all'altro).
Quanto alle limitazioni di TIN e Libero (solo su alcuni tipi di
contratto), non credo che sia aggirabile tramite l'opzione remailer
"posta da altre caselle" del tuo fornitore attuale: tenterebbe
comunque di accedere alla casella tramite POP3, e non gli sarebbe
consentito.
A meno di cambiare il contratto sulla vecchia casella, l'unica è
utilizzare (se disponibile) l'interfaccia web del gestore della
vecchia casella, che però non è così semplice da automatizzare, perché
è diversa per ogni fornitore. Non escludo che si possa trovare
qualcosa di già fatto, ma io non ne ho notizia.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: Rudimenti del perl

Sto cercando qualcheale liberamente scaricabile dalla rete che mi dia
una visione generale di questo linguaggi.
La mia conoscenza è uguale a zero
-- 
Fattitrovare
http://www.euroweb97.com/fattitrovare

gual...@bcsnet.it
 wrote:
 >Sto cercando qualcheale liberamente scaricabile dalla rete che mi dia
 >una visione generale di questo linguaggi.
La documentazione fornita, che puoi convertire in testo semplice o HTML.
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *

 wrote:
: 
gual...@bcsnet.it
 wrote:
:  >Sto cercando qualcheale liberamente scaricabile dalla rete che mi dia
:  >una visione generale di questo linguaggi.
: La documentazione fornita, che puoi convertire in testo semplice o HTML.
...e nelle distribuzioni recenti le FAQ (man perlfaq o perldoc
perlfaq), anche queste convertibili in HTML, LaTeX e testo liscio.
-- 
Nando Santagata: Telemastica & infornatica
Key fingerprint = C2 D9 C0 8E D5 B7 04 97  AF E8 3F 3E AF 4E 7F 9E

Newsgroup: it.comp.lang.perl
Titolo: Anyone know how to handle CVS files With " in them?

Anyone know how to handle CVS files With " in them?
I've come up blank with google searches!
Gary
ga...@tigerstripes.co.uk

 Anyone know how to handle CVS files With " in them?
  The "it" prefix in the name of this newsgroup does not means other
than "italia", the identifier of the italian UseNet hierarchy, where the
common, and the unique, language is the Italian one.  If you want to
post messages in English, use the international hierarchy newsgroup
(news:comp.lang.perl.misc).
	Alla prossima,
		Marco

Newsgroup: it.comp.lang.perl
Titolo: CGI e formato file

Ciao a tutti, ho una CGI che gira perfettamente in locale sul mio PC, ma
dopo l'upload vengono segnalati errori nel trovare i moduli e nel caricare
le sub.
A questo punto ho eseguito un accurato debug, ma la sintassi è OK, ho
sostituito per scrupolo i percorsi relativi con i percorsi assoluti, ho
settato correttamente i permessi di esecuzione, ho eseguito l'upload in FTP
ASCII mode...
Io avevo pensato a un problema durante l'upload o magari l'editor che uso
crea dei casini con i ritorni a capo e roba simile, mah!!!
Cosa può essere successo?!?!?!?!
Saluti a tutti, grazie in anticipo...
Emanuele C++



L'unica cosa che mi viene in mente e' di provare ad aprire una
sessione telnet sul server ed editare il file direttamente, magari
facendo copy paste dal file locale.


Ciao,
infatti ora sto provando in questo modo: apro una connessione SSH, da li 
chiamo EMACS e modifico i files... il fatto è che è tutto corretto (path, 
permessi, sintassi) ma mi vengono restituiti errori di "sub non definite" 
file non trovati mentre gli passo il percorso fisico corretto... Sto 
impazzendo!!!
Ora mi stava venendo il dubbio che forse EMACS è la causa dei miei 
problemi... è possibile????
Saluti a tutti
Emanuele
Newsgroup: it.comp.lang.perl
Titolo: Perl & Apache

Ciao a tutti.
Ho provato a far girare script cgi scritti in perl su un server Apache e
piattaforma Windows.
Ho installato ActivePerl e Apache . Ho creato un semplice script nella
cartella cgi-bin e ...
il server mi restituisce un errore del tipo (dal log): couldn't spawn child
process...
(La pagina restituita invece è un qualcosa del tipo "errore di
configurazione"...)
Lo script iniza chiaramente con #!c:/Perl/bin/perl.
Sotto linux basta fare chmod +x 
prova.pl
, ma sotto Windows come faccio?
Devo cambiare le impostazioni di default di Apache? O cos'altro?
Riconosco che sono quasi OT e quindi chiedo scusa, ma ringrazio vivamente
chi vuol spendere qualche minuto per aiutarmi.
Grazie.

 ....
Credo che tu deva fare l'associazione a ..\bin\perl deifiles *.pl e 
chiamare il tuo cgi ...pl
(credo)
--
 Mattia

Newsgroup: it.comp.lang.perl
Titolo: Accesso file Excell

Esiste una libreria in Perl che consenta di accedere ad un file in formato
Excell e leggere i dati contenuti senza dover utilizzare una fonte ODBC ??
Grazie


I moduli del namespace Spreadsheet::*
(
http://www.cpan.org/modules/by-module/Spreadsheet/
)
   - Enrico
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.perl
Titolo: si possono fare programmi per win32 col perl?

?

 cerchero' un'altra donna dentro ai sogni di Tarzan...

 wrote in message
37e236e5.9205845@proxy...


Ovviamente Si......


 wrote in message
37e3940b...@news.iol.it...


 
http://www.activestate.com/ActivePerl/docs/Perl-Win32/perlwin32faq.html
MM


 wrote in message
Pine.LNX.4.10.99091...@c64.comm2000.it...


 solo questo
Che significherebbe 'programmi visuali'? E' l'ultima moda della
programmazione fast-food?
Se intendi programmi con finestre alla X-Windows, quello che cerchi e' 
Perl::Tk.
Se invece intendi programmazione taglia/cuci alla Visual Pippo++, credo ci
siano dei tool commerciali.
Buona fortuna
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 
Ti ho suggerito le FAQ perchè ricordo con chiarezza che c'è un paragrafo
che risponde alla tua domanda. Assumo che con l'espressione "programmi
visuali" tu intenda programmi provvisti di GUI.
Una rapida scorsa alle FAQ  mi ha permesso di rintracciare il paragrafo in
questione:
http://www.activestate.com/ActivePerl/docs/Perl-Win32/perlwin32faq9.html
(cerca la stringa "GUI" nel testo)
MM

solo questo
Si, usa il modulo Tk
Ciao
Andrea
Newsgroup: it.comp.lang.perl
Titolo: DBI e DBD

Salve.
Scusate se forse posto una faq, ma non sono ancora riuscito a capire
cosa sono DBI e DBD... Qualcuno me lo spiega?
Mi sto avvicinando ora allo studio del perl, in particolare per quanto
riguarda la gestione dei DB.
Grazie 1000.

DBI (DataBase Interface) e DBD (DataBase Driver) sono appunto, due
"aggiunte" al perl che ti permettono ad esempio di interrogare,
aggiornare, gestire  un database SQL (io l'uso con il MySQL)
utilizzando script fatti in questo linguaggio; in pratica aggiungono
delle istruzioni a quelle gia' esistenti (una per le query, una per
gli insert, ecc) . Una volta installata questa specie di "interfaccia"
puoi quindi gestire il database con il perl. Ovviamente per i vari
comandi devi controllare nei vari README, ecc.
DBI e DBD sono leggermente diversi tra di loro, il DBI e' piu' recente
e ti consiglio di usare quello...  
Io personalmente uso DBI e msql-mysql modules per gestire un database 
mysql.
Tieni conto che DBI o DBD da sole non bastano, poi devi installare i
moduli per interfacciarti con il tipo di database da te scelto.
(ecco xche' msql-mysql modules)
Ciao!


Ciao!
Ciao, grazie.


Esatto, msql-mysql e' il driver DBD per DBI e mysql.
Sent via Deja.com 
http://www.deja.com/
Share what you know. Learn what you don't.

(ecco xche' msql-mysql modules)
No come ti dicevo DBI + DBD bastano in quanto il modulo che tu citi e'
proprio il DBD ;)
--------------------------------------------
 Voster semper Voster
         .And.
Ogni idea esposta rispecchia la mia personale opinione
 e non e' in alcun modo correlata con lo CSELT S.p.A.
Newsgroup: it.comp.lang.perl
Titolo: accesso struttura dati

Ciao,
sto come sempre litigando col perl :(
ho un loop nel programma principale che memorizza i dati in questa maniera:
    my ($host,$time,$val1,$val2) = split (/ /,<$data>);
    $dati{$host}[$time] = [$val1, $val2];
ora a fine programma vorrei fare un ciclo che mi stampi tutto il 
contenuto della struttura dati, ma non ci riesco :(
chi mi può dare una mano?
grazie
--
Ranger!

 contenuto della struttura dati, ma non ci riesco :(
Beh, se serve solo per vedere se ha preso i dati giusti, puoi usare il
modulo Data::Dumper (incluso in perl):
  use Data::Dumper;
  # qui il tuo ciclo...
  print Dumper(\%dati); # notare che passi una *reference* all'hash
Probabilmente verrai inondato di dati, se $time contiene quello che penso...
Altrimenti potresti fare qualcosa del genere:
  for my $host (sort keys %dati) {
     my $dati_host=$dati{$host};
     for my $time (0..$#{$dati_host}) {
        next unless exists $dati_host->[$time]; # salto gli elementi
                                                # mai assegnati
        my $valori=$dati_host->[$time];
        print "host: $host; time: $time; valori: @$valori\n";
     }
  }
Qualche punto da notare:
- %dati contiene reference a array (indicizzati dai timestamp)
- ciascun elemento di questi array contiene una reference ad array (di
  due elementi)
- se @a è un array, $#a è il massimo indice cui corrisponde un
  elemento assegnato
-- 
	Dakkar - <Mobilis in mobile>
	GPG public key fingerprint = A071 E618 DD2C 5901 9574
	                             6FE2 40EA 9883 7519 3F88
	                    key id = 0x75193F88

 migliore...
grazie x la risposta! sospetti correttamente! :)
contiene proprio il timestamp! quindi un numero intero sempre crescente 
che vale più di 1 miliardo adesso ..
la struttura deve memorizzare 2 dati (val1 e val2) dipendenti da 
timestamp per ogni host.
poi ad intervalli regolari per ogni host devo scrivere i dati su disco 
in ordine cronologico ed azzerare tutta la struttura. è importante anche 
  che il programma sia veloce, perchè l'idea è di aumentare le 
performance di una macchina che raccoglie dati in realtime.
cosa useresti per $time al posto di un array?? un hash? però gli 
elementi devono essere ordinati, posso usare sort? dal libro che ho 
sfogliato sembra che sort mi ordini in modo alfabetico e non numerico, 
per questo ho usato l'array.
Grazie ancora,
ciao
--
Ranger!

 per questo ho usato l'array.
Beh, sort (se non gli passi un blocco come primo argomento) usa
implicitamente l'operatore 'cmp' che confronta stringhe. Ma puoi usare
qualsiasi confrontatore tu voglia. In questo caso puoi usare:
  sort { $a <=> $b } keys %{$dati{$host}}
per ottenere i timestamp ordinati in ordine crescente.

Newsgroup: it.comp.lang.perl
Titolo: CHMOD

Mi potresti delucidare maggiormente su cos'è il CHMOD e come lo utilizzo via
ftp.
Grazie
Andrea Monaco

 ha scritto nel messaggio
news:C9A_4.92153$VM3.6...@news.infostrada.it...


ftp.
Il CHMOD e' il comando, generalmente usato sui sistemi unix, per
settare i permessi che si danno ad un file, qualunque cosa esso sia.
In WSFTP c'e' proprio un pulsante che si chiama CHMOD e se lo premi
dopo aver selezionato un file sul server ti permette di settare i
permessi del file in questione.
Per uno script in per in particolare devi dare a tutti i permessi di
lettura ed esecuzione, e solo a te (l'owner del file) il permesso di
scrittura sul file).
Cmq penso che in tutti i programmi di FTP ci sia il CHMOD.
Ciao
PSQ

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

salve a tutti .Ho fatto un script di autenzicazionema mi fa questo errore
Can't locate Net/LDAP.pm in @INC (@INC contains:
/usr/lib/perl5/5.6.0/i386-linux /usr/lib/perl5/5.6.0
/usr/lib/perl5/site_perl/5.6.0/i386-linux /usr/lib/perl5/site_perl/5.6.0
/usr/lib/perl5/site_perl .) at ./
newauthldap.pl
 line 3.
BEGIN failed--compilation aborted at ./
newauthldap.pl
 line 3.
Alla linea 3  
use Net::LDAP;
use FileHandle;
Cosa significa?
Grazie.
-- 
Posted from  [195.103.63.134] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Cosa significa?
Che dovresti imparare l'inglese (o, perlomeno, rivedere quello che sai)
dato che c'e` scritto *chiaramente* cosa non va {Hint: hai installato i
moduli Net::LDAP?}.
Bye,
 Emmanuele.
-- 
I ... Owe ... You ... Pain! -- Willow, "Tough Love"
Italian Buffy Resource Site (Beta) - 
http://www.ibrs.f2s.com
GnuPG Key ID: 0xA4320FF4
GnuPG Key FP: 4DD0 C90D 4070 F071 5738  08BD 8ECC DB8F A432 0FF4

 Alla linea 3
Non hai installato il modulo Net::LDAP, oppure si trova in qualche posto... 
inconsueto.
        Michele.
Newsgroup: it.comp.lang.perl
Titolo: Principiante : POST

Un mio script Perl deve far comunicare due pagine HTML già esistenti.
- Nella prima pagina compilo i dati.
- schiaccio il Tasto SUBMIT
- tramite POST passo i dati al mio script Perl che elabora i dati
- e adesso il mio script deve passare i dati elaborati ad una pagina ASP non
gestita da me via POST (questa pagina è già predisposta per elaborare
correttamente i parametri inviati).
il problema è : Posso inviare dei dati via POST senza un tasto specifico in
uno script Perl?
in sintesi:
Il mio script Perl deve ricevere dei dati, elaborarli e passarli, via POST,
ad una seconda pagina ASP.
Come faccio?

ad una seconda pagina ASP.
Il modo + semplice, IMHO, e' quello di generare una pagina HTML con un
body che, con il metodo onLoad, fa il submit di una form tutta
composta di campi Hidden.
------
http://zap.to/balestra
  ICQ#:14303012
" Ora mai che i baci tuoi piu' non mi sazian
  cerchero' un'altra donna dentro ai sogni di Tarzan... "

 composta di campi Hidden.
E che non funziona se l'utente ha Javascript disabilitato.
Consiglio di installarsi il modulo LWP (libwww) e guardarsi l'esempio sul POST
nella manpage lwpcook, dove si fa uso di LWP::UserAgent
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)




Grazie.

>body che, con il metodo onLoad, fa il submit
------


Potresti farmi vedere un esempio ?
Grazie!



Generi un file cosi':
<HTML><BODY onLoad="javascript:dati.submit()">
<FORM METHOD="POST" ACTION="/cgi-bin/
my2ndscript.pl
" NAME="dati">
<INPUT TYPE="HIDDEN" NAME="foo" VALUE="va bene?">
</FORM>
</BODY></HTML>


GRAZIE!

 Come faccio?
dai un'occhiata ai moduli LWP::*
-- 
Perl is designed to give you several ways to do anything, so
consider picking the most readable one.
             -- Larry Wall in the perl man page
Newsgroup: it.comp.lang.perl
Titolo: Richiamare funzioni Java in Perla

Per poter utilizzare il nuovo sistema di Banca Sella (GestPay) è necessario
installare una libreria Java che 'gira' su una Java Virtual Machine.
Ammesso che la cosa sia fattibile facilmente su server Unix, qualcuno ha
idea di come poi si può utilizzare la funzione (classe) Java all'interno di
uno script Perl?
Bruno

 ha scritto nel messaggio
news:99a0tm$evd$1...@fe1.cs.interbusiness.it...

Io per fortuna non ho questi problemi, il mio engine è scritto in java al
100% !!!
Sono stato veramente fortunato!

uno script Perl?
Ci sono i moduli del toolkit JPL. Vedi CPAN o:
http://www.seas.smu.edu/~jodea/
	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!

Newsgroup: it.comp.lang.perl
Titolo: carrello della spesa

devo realizzare un carrello della spesa per un sito di e-commerce, sono
indeciso sulla tecnica da utilizzare, cookies o db.
Se uso i cookies dovrei memorizzare per n prodotti che l'utente acquista
almeno il codice e la quantità, forse diventerebbero troppi, se poi
l'utente deve modificare l'ordine dovrei cancellare o modificare questi
cookies, operazione non certo usuale per i cookies.
Col db (che devo utilizzare cmq per l'ordine finale)guadegnerei in
efficienza e precisione ma ho dubbi sulla velocità, per ogni ordine o
modifica di ordine bisognerebbe interrogare o aggiornare il db e alla fine
il carico potrebbe essere eccessivo, anche se interbase è piuttosto
efficace.
voi quale delle due soluzioni scegliereste?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 voi quale delle due soluzioni scegliereste?
DB. O meglio: cookie per mantenere un ID di sessione, e poi DB
(o filesystem, se preferisci) per mantenere, lato server, i dati
della sessione dell'utente (con il contenuto del carrello della 
spesa e quant'altro). Quando l'utente passa al checkout allora 
l'ordine viene registrato su DB, nella maniera che ritieni piu`
opportuna. I dati vengono comunque presi e poi registrati su
DB (o su filesystem) ad ogni richiesta fatta al server. 
Per realizzare il tutto CGI::Session oppure Apache::Session.
ciao,
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it
Newsgroup: it.comp.lang.perl
Titolo: come si fà? moduli MIME::Lite ecc...

scusatemi, ho trovato il vostro newsgroup molto interessante io sono un
principiatissimo, nel senso che il mio lavoro di tecnico mi ha portato ogni
volta a dovermi aggiornare su cose che 20 anni fa quando inizia a lavorare
facendo il tecnico hardware neanche immaginavo...
dico questo per emmm prepararvi alla mia domanda sciocca, allora, sto
seguendo da un pò di tempo in qualità di assistente operatore un servizio
outsourcing che richiede anche delle conoscenze sulla rete, mi è stato
richiesto di realizzare un sistemino per inviare in automatico delle e-mail,
spiego...questo lavoro consiste a volte nell'inviare delle mail con attach
fisso indirizzi destinatari fissi ecc.ecc. quindi sempre le solite, parlando
con un mio collega di questa richiesta che mi avevano fatto, lui mi ha
suggerito di installare dei moduli in perl su il server di posta, cosa che
ho fatto avevo un servere di posta qmail su cui ho scaricato dopo avere
installato l'utility di perl cpan> i 2 moduli MIME:
MIME::Lite e MimiToll tutto è andato bene...
ecco la domanda è questa,
1°)l'installazione dove mette le form preparate come questa?
 
    ### Create a new single-part message, to send a GIF file:
    $msg = MIME::Lite->new(
                 From =>'
m...@myhost.com
',
                 To =>'
y...@yourhost.com
',
                 Cc =>'
so...@other.com
, 
so...@more.com
',
                 Subject =>'Helloooooo, nurse!',
                 Type =>'image/gif',
                 Encoding =>'base64',
                 Path =>'hellonurse.gif'
		 );
oppure l'installazione non prepara nessuna form ma la debbo scrivere io..?
se cosi fosse scrivo una form simile a quella che vi ho presentato sopra ma
con idirizzi veri dove la scrivo? come faccio far partire il messaggio
manualmente?
come faccio a vedere che funziona? in azienda ho diversi server di posta per
fare prove, i moduli li ho installati come già detto su un server qmail sia
mail relay che pop funzionanti e ho tutto l'idispensabile per fare le prove
2°) una volta appurato che i moduli di perl funzionano ed io riesco a
inviare posta come potrei fare per inviare automaticamnte le solite mail con
i soliti indirizzi mail con i soliti attach?
devo fare degli script? (mai fatti :-( ) ci sono degli script già
predefiniti per questo? se si dove?
per ora vi ringrazio qualsiasi sia la risposta
ciao
domenico
 
--------------------------------
Inviato via 
http://usenet.libero.it

manualmente?
Se, come ho capito, il messaggio è il medesimo per tutti i destinatari, io
credo che la cosa migliore, nella tua situazione, sia separare i due
compiti: preparazione del messaggio e gestione degli indirizzi. Per gli
indirizzi puoi utilizzare un programma per la gestione di mailing list,
come mailman, o anche smartlist.
A questo punto, lo script perl si limiterà a spedire il messaggio
all'indirizzo di lista.
O, eventualmente, a questo punto lo script perl potrebbe sparire anche del
tutto, e potresti fare tutto dal tuo lettore di posta.
Per utilizzare perl, comunque, necessariamente devi fare uno script ed
eseguirlo.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: CGI, Perl e DataBase

Ciao a tutti,
spero mi possiate dare un consiglio. Sto scrivendo
degli script cgi in Perl da utilizzare su un sito internet
ed ho necessita' di utilizzare un database. Purtroppo il
provider non mi da' nessun tipo di database server ma solo il
Perl. Cosa mi consigliate di utilizzare tenendo presente che
avro' bisogno di effettuare ricerche di dati tra piu' tabelle
collegate tramite i campi chiave?
Se possibile rispondetemi in email mailto:
core...@geocities.com
Grazie.
Stefano.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/
       Search, Read, Discuss, or Start Your Own    

core...@geocities.com
 wrote:
: spero mi possiate dare un consiglio. Sto scrivendo
: degli script cgi in Perl da utilizzare su un sito internet
: ed ho necessita' di utilizzare un database. Purtroppo il
: provider non mi da' nessun tipo di database server ma solo il
: Perl. Cosa mi consigliate di utilizzare tenendo presente che
Puoi usare lo stesso il modulo DBI (database interface) usando un DBD
(database driver) che non usi un DBMS, ad esempio DBD::XBase, che usa
files DB3, o DBD::CSV, che usa files di testo con campi separati da
virgola.
-- 
Nando Santagata: Telemastica & infornatica
Key fingerprint = C2 D9 C0 8E D5 B7 04 97  AF E8 3F 3E AF 4E 7F 9E
finger nando (at) ns (dot) ipers (dot) net   for my PGP public key
Home: 
http://www.ipers.net/~nandos

Newsgroup: it.comp.lang.perl
Titolo: ma insomma...

domani c'č Larry Wall a Ferrara??
In quanti di questo newsgroup ci saranno??
(io ancora devo vedere i prezzi del treno...)

 In quanti di questo newsgroup ci saranno??
Che io sappia: io, Stefano Rodighiero, dada, Enrico Sorcinelli

Allora...mi sono perso un evento storico?

 Allora...mi sono perso un evento storico?
 
http://www.perl.it/blog/archives/000112.html
ciao,
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it

 
ho letto...NO!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

 Allora...mi sono perso un evento storico?
I guess.
-- 
                          Maurizio - Tannoiser - Lemmo
                 Founder Member of ERLUG 
http://erlug.linux.it
-------------------------------------------------------------------------------
God is real, unless declared integer
Newsgroup: it.comp.lang.perl
Titolo: (no subject)



 

-- 
Dott. Luigi Salafia
CBD - Universita' di Catania
c/o Biblioteca L.Antonini
V.le A.Doria,6 Catania
tel. 095.738.2910 
fax  095.738.2914

 




Newsgroup: it.comp.lang.perl
Titolo: CEPU-ladri Corsi do Informatica 60.000.000! CORREZIONI

Cortesi amici della ml
oggi incuriosito da tanta pubblicità fatta da CEPU (
www.cepuweb.it
) sono
andato ad una loro sede per informarmi meglio.
Bene, il corso di Web Engineer della durata di un anno costa 60.000.000! Sì,
avete letto bene sessantamilioni di lire italiane. Al colloquio mi hanno
detto per darsi delle arie ovviamente che i corsi erano a "numero chiuso" e
la classe di una quindicina di persone. La "consulente" (così si è
qualificata) mi ha subito detto, essendo io prossimo ai trenta anni che
forse avrei preferito fare un corso meno impegnativo e cioè quello di Web
Master della durata di sei mesi (anche quattro o cinque nel caso avessi io
voluto aumentare la periodicità delle lezioni). 2 lezioni individuali a
settimana di un'ora-un'ora e mezza circa. Il tutto alla modica somma di
18.000.000.000 (didiottomilionidilireitaliane) Facendo due conti... 2 ore di
lezioni settimanali per sei mesi fa  48 lezioni. 
18.000.000./48
 = poco meno
di £. 400.000 Costano molto meno le puttane e non danno vaghe prospettive di
lavoro dopo il corso. Spero tanto che qualcuno primo o poi hakeri il loro
sito e al posto della pubblicità dei loro corsi metta la foto di Arsenio
Lupin. Anzi penso che da qui a qualche mese sarà questo il modo col quale
imparerò ad usare il Web in modo "professionale" come dicono loro.
---------
Oggi la libertà è la libertà della diffusione-ricezione della
conoscienza-informazione e Internet può essere uno dei mezzi per la
diffusione di informazioni e saperi fuori dalla logica dei centri di
monopolio che riducono la conoscienza a merce e strumento d'oppressione
individuale. Internet può e deve essere la crescita della propria mente
senza maestri censori e bacchettoni al servizio delle oligarchie del potere
dominante. {questo lo ha scritto un mio amico poeta}

use Brain if defined;
 pack "AHAH", CEPU if exists($OTuser{'
spammino.buono.it
'});
die please, please;

Newsgroup: it.comp.lang.perl
Titolo: conoscere il nome del file .pl dall'interno dello script

Salve Gente,
ho un'altra piccola necessità...
Vorrei caricare in una variabile il nome del file dello script senza 
l'estensione .pl...
C'e' un modo veloce tipo
$nomescript = ....
???
Grazie 1000
Daniele

$nomescript = ....
  $nomescript = $0;
  $nomescript =~ s/\.pl$//;
Ciao.


Grazie Giovanni,
ancora una piccola cosa...
Sempre tramite le regex mi potresti eliminare anche il path del file:
es: ./
nomescript.pl
 diventa nomescript
es: /root/prova/
nomescript.pl
 diventa nomescript
Grazie ancora...
Le regex su perl ancora non le mastico...
Passare da Win a Linux non è poi una passeggiata...
Saluti
Daniele

Passare da Win a Linux non è poi una passeggiata...
Nel caso presente, mi pare si riduca a cambiare '\\' in '/'.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: Eseguire comandi della shell di Unix all'interno di uno script Perl

Ciao! Mi potreste indicare qual è la sintassi da utilizzare per far eseguire
un comando della shell di Unix all'interno di uno script Perl?
Grazie, Manuel.

un comando della shell di Unix all'interno di uno script Perl?
system("comando");
$output = `comando`; # Se vuoi catturare l'output
	Michele.
P.S.: Ho appena aggiunto cio` e qualcosa di piu` alle FAQ.
-- 
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!

Newsgroup: it.comp.lang.perl
Titolo: XML::DOM - moduli hosting

Qualcuno mi sa indicare un qualche fornitore di hosting gratuito che
supporta perl, con un "corazzamento di moduli" che fornisca anche:
URI::Escape
XML::DOM
Ho provato con 
netfirms.com
, ma per quanto riguarda il modulo XML::DOM pare
che non è supportato (strano pensavo che fosse in quasi tutte le
installazioni linux). :-(
Grazie a tutti,
--Gabriele

Gabriele wrote:

Se la tua ricerca si limita a fornitori gratuiti temo di non poterti aiutare.
Con hosting che forniscono anche un account SSH non è difficile installarsi i
moduli aggiuntivi necessari
by
    - Enrico
--- have fun with 
www.perl.it
 ---

Newsgroup: it.comp.lang.perl
Titolo: perl guida di riferimento

Volevo sapere se gentilmente qualcuno mi potesse scannerizzare ed inviare la
parte sui socket
mo...@email.it

JackLero wrote:

Hai già letto:
http://search.cpan.org/doc/GBARR/IO-1.20/IO/Socket.pm
Dovrebbe aiutarti un bel po. 
Ciao
***************************************
messaggio inviato tramite HostSearch.it
---------------------------------------
---> 
http://www.hostsearch.it/newsgroup
***************************************
Newsgroup: it.comp.lang.perl
Titolo: Espressione irregolare

Salve a tutti,
ho bisogno di riconoscere in un testo (che può contenere anche molti
a-capo) una sezione compresa fra due "marcatori" specifici, per esempio
qualcosa del genere:
(...roba che non mi serve)
ZZZ [sezione che devo prelevare
...
...]
ZZZ
(ecc. ecc...)
dove 'ZZZ' fa da marcatore. Ho provato a usare l'espressione regolare:
if($testo=~/ZZZ((\s+.*)+)ZZZ/)
  { print "Beccato:\n $1\n";
  }
ma perl mi finisce in loop e lo devo interrompere con ctrl+c.
Qualcuno mi sa dire dove sbaglio?
Grazie.

   }
1. cosa c'e' in $testo? come hai caricato il testo in $testo? :-)
2. Perche non usi ZZZ(.*)ZZZ ?
3. se hai degli "a capo" devi usare /ZZZ(.*)ZZZ/s
-- 
Saluti,
Giancarlo

 3. se hai degli "a capo" devi usare /ZZZ(.*)ZZZ/s
Ecco, appunto. La terza che hai detto. Funziona!
Grazie!
Gabriele

 riga e concatenato in $testo. Faccio una stronzata?
Dipende.... forse e' meglio fare il template un po' meglio e cercare il 
testo riga x riga.... se il file e' grande metterlo tutto in una 
variabile vuol dire sprecare tanta memoria.
-- 
Saluti,
Giancarlo

 Qualcuno mi sa dire dove sbaglio?
Quel semplice 'if' non può produrre un loop. Probabilmente hai usato
quella istruzione =~ nella clausola di un while. Se non specifichi
l'opzione /g la regexp ha sempre successo e l'offset in $text non si
sposta (v. perldoc perlre, perldoc -f pos).
Prova, invece, il codice sotto. Nota le opzioni /g e /s. Nota anche il
'?' dopo il '*' nella regexp.
Max
my $text = join '', <DATA>;
while( $text =~ /ZZZ(\s+.*?)ZZZ/sg )
{
	print "> $1 <\n";
}
__DATA__
ZZZ 
 
 -- 1 --
ZZZ
-- to skip --
ZZZ 
 -- 2 --
ZZZ

 }
Ottimo. Grazie mille!
Gabriele

Newsgroup: it.comp.lang.perl
Titolo: split to hash

Ciao,
perdonate il subject un po' "fantasioso", ma non sapevo come
sintentizzare. In pratica avevo da creare una hash recuperando le
chiavi da una stringa e i valori da un'altra, entrambe da splittare.
Vi incollo qui sotto il codice, volevo solo sapere se esiste una
soluzione piu'... perl-oriented e/o piu' prestante visto che devrei
eseguirla centinaia di migliadi di volte per diversi valori di $v (a
parita' invece di $r).
Grazie!
===
# definizione dei campi
$r = "nome;regione;tel";
# record d'esempio
$v = "Daniele;Toscana;001234567";
@field = split /;/,$r;
%db = ();
@value = split /;/,$v;
for($i=0;$i<=$#field;$i++) {
	$db{$field[$i]}=$value[$i];
}
# esempio d'uso
print "Chiama " . $db{'nome'} . " al " . $db{'tel'} . "\n";
===
Daniele

 parita' invece di $r).
Mi sembra un problema risolvibile in maniera efficace con
il modulo Text::CSV_XS. Cercalo su 
search.cpan.org
 per leggerne
la documentazione e scaricare il pacchetto
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  Italian Perl Mongers: 
http://www.perl.it
Newsgroup: it.comp.lang.perl
Titolo: Leggere dal POP3

Devo leggere da un pop3 la mia posta ma il server dice:
CGI Error
The specified CGI application misbehaved by not returning a complete set of
HTTP headers. The headers it did return are:
Can't locate Mail/POP3Client.pm in @INC (@INC contains: C:/Perl/lib
C:/Perl/site/lib .) at d:\inetpub\webs\fioraniorg\cgi-bin\
pop.pl
 line 1.
BEGIN failed--compilation aborted at
d:\inetpub\webs\fioraniorg\cgi-bin\
pop.pl
 line 1.
Quindi manca una libreria ma mi hanno detto che basta inserire nella
cartella cgi-bin il file .pm e poi funziona lo stesso!!!
La domanda è la seguente:
è vero che basta copiare il file?
Se si il file dov e lo posso trivare su active state non l'ho trovato
Grazie in anticipo!!!

> Can't locate Mail/POP3Client.pm in @INC (@INC contains: C:/Perl/lib
Mi sembra esplicito manca il modulo Pop3Client.pm .
Lo trovi su activestate o cpan
ciao

 ha scritto nel
messaggio news:3A387A2A...@venaria.marelli.it...


 ha scritto nel messaggio
news:91b1th$1b2$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.perl
Titolo: Codice incompreso...

Guardate il codice qua sotto...
foreach $test (@query)
{
    if (($test =~ /.* \Q$1\E$/) || ($test =~ /.* \Q$1\E .*/) || ($test =~
/^\Q$1\E .*/) || ($test =~ /^\Q$1\E$/))
    {
         $chk = 1;  last;
    }
}
cosa fa di preciso? Ma soprattutto cosa vogliono dire quie \Q e \E prima e
dopo $1 (che viene da un if con espressione regolare precedente al codice
postato)
Aiuto....
ciao
Gazza

 Gazza
Ciao Stefano

 ha scritto nel messaggio
news:adlcfo$jdl$1...@fe2.cs.interbusiness.it...

Ho capito, grazie mille
ciao
--
Obi-Wan : "You'll be the death of me"
Anakin : "Don't say that master"
Andatelo a vedere l'Attacco dei Cloni, č bello, davvero.
Gazza
Newsgroup: it.comp.lang.perl
Titolo: Messaggi ai GSM

Ciao!
Vorrei scrivere una funzione Perl che mandi messaggi (SMS) ai cellulari
GSM. Vorrei sapere anzitutto se c'e` qualcosa di gia` pronto e, in caso
contrario, se c'e` qualche gateway da poter sfruttare (e quale, e come).
	   Grazie, Michele.
-- 
Michele Beltrame
mi...@io.com
http://www.io.com/~mick/

 contrario, se c'e` qualche gateway da poter sfruttare (e quale, e come).
Il problema, come al solito, e' se vuoi pagare o meno :)
Inoltre, a chi vuoi mandare il messaggi: a chiunque o ad un set particolare di
persone.
Esistono Gateway SMS (vai in uno qualsiasi dei gruppi di telefonia per
sapere le ultime novita'), dove c'e' il form on-line e la possibilita' di
spedire un numero piu' o meno limitato di SMS a qualsiasi numero.
Oppure, almeno per il sito Omnitel, gli utenti hanno la possibilita' di
spedire un certo numero di SMS da un form (e di ricevere SMS ad un
particolare indirizzo di e-mail).
Se cerchi di usare un Gateway, il problema si riduce a riempire un form POST
tramite uno script (e la soluzione la conosciamo gia').
Se invece vuoi/puoi usare indirizzi i e-mail/SMS, la soluzione e' ancora
piu' semplice.
A suo tempo mi ero scritto un filtro per la posta che mi ridirigeva certi
messaggi direttamente sull'SMS. Complessita' inesistente e praticamente 
inutile :)
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)




persone.
Preferirei scrivere un CGI che utilizi un gateway gratuito, pero` ne
conosco pochi (gateway). Puoi indicarmene qualcuno? Vorrei essere in
grado di mandare messaggi a quasiasi GSM.


 grado di mandare messaggi a quasiasi GSM.
 Come ti ho detto, se provi a frequentare per qualche giorno uno dei newsgroup
 di telefonia cellulare (tipo it.telefonia.omnitel o it.telefonia.tim o
 qualcosa del genere) dovresti riuscire ad trovare le informazioni piu'
 recenti. Al limite prova a chiedere esplicitamente (o a consultare
 l'archivio su MailGate).
 
 Tra l'altro, molti gateway, anche se gratis, hanno un limite per i messaggi
 giornalieri (probabilmente per destinazione). Verifica.

Newsgroup: it.comp.lang.perl
Titolo: Perl PDF

Ciao a tutti,
Volevo sapere se qualcuno conosce come ruotare un pdf di 180 gradi, tramite 
uno script perl.
Grazie
SIMONE 

 writes:
  S> Ciao a tutti, Volevo sapere se qualcuno conosce come ruotare un
  S> pdf di 180 gradi, tramite uno script perl.
Con PDF::API2 dovrebbe essere piuttosto semplice.
Ciao,
nico


Con PDF::Reuse dovrebbe essere molto semplice:
	#Ex. To rotate from portrait (595 x 842 pt)
	#to landscape (842 x 595 pt)
	use PDF::Reuse;
	use strict;
	prFile('New_Report.pdf');
	prMbox(0, 0, 842, 595);
	prForm({file   => 'cert1.pdf',
		rotate => 'q1' } );
	prEnd();
Questo frammento di codice effettua una rotazione di 90° gradi in senso 
orario. Se vuoi una rotazione di 180°, usa
	rotate => 'q2'
(da quello che ho capito.)
Copiato e incollato dalla documentazione di PDF::Reuse, *mai* testato di 
persona.
http://search.cpan.org/~larslund/PDF-Reuse-0.29/Reuse.pm
Ciao,
Emanuele.

uno script perl.
Si tratta, se capisco bene, di modificare il valore della proprietą
"Rotate" dell'oggetto "Pages". Con Text::PDF:
    use Text::PDF::File;
    use Text::PDF::Utils;
    use Text::PDF::Page;
    $p = Text::PDF::File->open("file.pdf", 1);# open file for
                                              # appending
    $r = $p->read_obj($p->{'Root'});        # read the page root
    $pgs = $p->read_obj($r->{'Pages'});     # Get the pages tree
    $pgs->{'Rotate'} = PDFNum(180);
    $p->out_obj($pgs);
    $p->append_file;
Nota che questo modifica il file originale, non crea una copia
ruotata. Se vuoi ritornare indietro, comunque, puoi usare l'utilitą
pdfrevert, distribuita con Text::PDF.
Ciao.