mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: Comando dos in perl!!

Sapete come fare???
Holz

 Sapete come fare???
forse
system('c:\path\to\comando.exe')
?
-- 
Saluti,
Giancarlo

 Sapete come fare???
	perldoc -f system
	perldoc perlop (cercando "backtick")
	% perl -e "system 'dir'"
	% perl -e "@dir_entries=`dir`; print qq|@dir_entries\n|"
-- 
Alla prossima,
Marco

Grazie milleeeeeeeeeeeeeeeeeeeeeeee!!
Mi consiogliate quelche sito valido per il perl??
Si può che ho perso tutta una giornata per decomprimere un maledetto file
zip???
Vabbè, fortuna che ora funziona!!!
Holaz!!!

Newsgroup: it.comp.lang.perl
Titolo: differenza date in giorni

Ciao a tutti, 
come faccio a fare la differenza di due date in giorni? 
esiste qualche funzione particolare? 
grazie
( le due date sono epsresse in time() )

Larry wrote:

Dovrebbe bastare fare la differenza tra le due date e
prendere la parte intera della divisione per 86400.
Nota: 86400 e' il numero dei secondi che ci sono in un giorno.
Ciao,
Giovans

Nota: 86400 e' il numero dei secondi che ci sono in un giorno.
Tranne quando sono 86401, per le risincronizzazioni di rito al tempo
astronomico, come è accaduto a capodanno del 2000.
Mi sa che la cosa più semplice resta usare uno dei tanti moduli per il
trattamento delle date.
Ciao.

Newsgroup: it.comp.lang.perl
Titolo: Perl novice needs quick help

Hi, I'm pretty new to the world of perl, and I am building a script, in
which I need to create a new page which is based upon a template, where
the data from my form will be inserted into parts of the template. I
have so far managed to make it create the file, but I am unsure as of
how to put the data into the template and put it into the page. Please
could you share some of your expertise and possibly show me how this
could be done?
Many thanks
Pete Williams
Sent via Deja.com 
http://www.deja.com/
Share what you know. Learn what you don't.

...

Newsgroup: it.comp.lang.perl
Titolo: Numero RIga Array

Ciao a tutti,
Ho questa funzione:
foreach $riga_pag(@pagina) {
	if ($riga_pag =~ m/(match)/) {
		@pippo = $riga_pag;
		print DEST @pippo;
		}
}
Mi controlla una per una le righe dell'array "pagina" e quando trova la
parola "match" la copia nell'array "pippo"; fino a qui tutto a posto.
Io pero vorrei che nell'array "pippo" mi riportasse anche il numero
della riga e NON solo il suo contenuto, per esempio:
se la riga 23 di "pagina" è uguale a "ciao match", nell'array "pippo"
vorrei poter avere "23 - ciao match".
Qualcuno saprebbe aiutarmi, grazie anticipatamente.

della riga e NON solo il suo contenuto, per esempio:
Non so se ci sia una variabile che contiene l'indice del foreach (mi sa di
no), la cosa più semplice comunque mi sembra cambiare il ciclo:
 
      for ($i = 0; $i < @pagina; $i++ ) {
            $riga_pag = $array[$i]
            if ($riga_pag =~ m/(match)/) {
               ...
	    }
      }
Ciao.

Ciao e grazie per la risposta!
Sei dubbioso sulla funziona foreach?
Il match me lo faceva corretto ...

            $riga_pag = $array[$i]
             $riga_pag = $pagina[$i];        


Il match me lo faceva corretto ...
Sono dubbioso su questa riga:
    @pippo = $riga_pag;
Francamente, non ne capisco il senso. A quanto pare, è sintatticamente
valida, ed ha lo stesso effetto di:
     @pippo = ($riga_pag);
che, ai miei occhi, è un pochino più chiara.
Ancora non capisco, però, perché usi un array per memorizzare un unico
valore.
Ciao.

Uso l'array @pippo per memorizzare tutte le righe dell'array @pagina
che soddisfano l'espressione.

che soddisfano l'espressione.
No, con quella istruzione usi l'array @pippo per memorizzare UN valore, e
al ciclo successivo lo butti via memorizzando il nuovo.
Un'assegnazione è un'assegnazione.
Se vuoi accumulare tutti i valori, devi fare qualcosa del genere:
      push @pippo, $riga_pag;
Ciao.

Newsgroup: it.comp.lang.perl
Titolo: Domanda MOLTO generale sui database

Salve,
è da un po' di tempo che mi cimento con il PERL e ormai ho raggiunto un po'
di dimestichezza con le funzioni principali del linguaggio, tuttavia per
salvare i dati ho sempre usato file di testo (e a dire la verità mi sono
sempre trovato benissimo).
Ho sempre sentito dire che i database sono (oltre che più professionali
senza dubbio) migliori per immagazzinare e ricercare dati rispetto ai file
di testo (e non fatico a crederci!!) e mi piacerebbe sapere quali sono i
vantaggi del database e di che cosa ho bisogno per provare ad utilizzare
database al posto di files txt.
Grazie 10000
SK

: 

Newsgroup: it.comp.lang.perl
Titolo: lock di file in fase di scaricamento

Ho il seguente problema e spero che qualcuno di voi riesca a darmi una mano:
Ho creato un programma in perl che comprime dei file in formato zip e li
rende disponibili per il download, per evitare però di finire in fretta lo
spazio sull'HD del server, ho fatto in modo che questi files vengano
eliminati 4 ore dopo la creazione.
1) E' possibile fare in modo che il programma controlli se il file è ancora
usato da qualche utente che lo sta scaricando, in tal caso non dovrebbe
essere cancellato?
2) E' possibile cancellare dei file di cui si conosce il nome e la directory
senza passare per la funzione "system" che provoca dei problemi nel
passaggio del programma tra sistemi operativi che usano "del" e SO che usano
"rm"?
Grazie
Andrea

am...@tin.it
 wrote:
 >1) E' possibile fare in modo che il programma controlli se il file è ancora
 >usato da qualche utente che lo sta scaricando, in tal caso non dovrebbe
 >essere cancellato?
Non so come si comporta NT, ma per unix non e` un problema. Quando viene
cancellato un file aperto i suoi blocchi non vengono usati finche`
l'ultimo dei programmi che lo usa ha chiuso il file descriptor.
 >2) E' possibile cancellare dei file di cui si conosce il nome e la directory
 >senza passare per la funzione "system" che provoca dei problemi nel
 >passaggio del programma tra sistemi operativi che usano "del" e SO che usano
 >"rm"?
Usa la funziona unlink.
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *

 wrote:
: 1) E' possibile fare in modo che il programma controlli se il file è ancora
: usato da qualche utente che lo sta scaricando, in tal caso non dovrebbe
: essere cancellato?
Se usi un sistema operativo degno di questo nome...
Prova a creare un file, chiamiamolo "dati" con qualche riga di testo
dentro, poi scrivi:
perl -ne 'print;sleep 10' dati
A questo punto vedi stampata la prima riga e puoi cancellare il
file da un altro {terminale|finestra} e vedere cosa succede al
programma che sta girando.
Su un sistema unix like, il file viene eliminato dalla directory, ma
i suoi dati restano disponibili a tutti i programmi che lo stavano
usando e solo dopo che l'ultimo programma e` terminato i blocchi di
dati vengono effettivamente liberati.
: 2) E' possibile cancellare dei file di cui si conosce il nome e la directory
: senza passare per la funzione "system" che provoca dei problemi nel
: passaggio del programma tra sistemi operativi che usano "del" e SO che usano
: "rm"?
unlink "file";
-- 
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) ipers (dot) net   for my PGP public key

Si. unlink $file
Grazie
Andrea Busia

faresti un grosso piacere se mi dicessi come fare.
Come non detto, ho risolto.
Grazie a tutti
Andrea
Newsgroup: it.comp.lang.perl
Titolo: programmazione thread in perl

Devo fare un pogramma perl che ad un certo punto esegue una serie di
comandi
diversi, ma in parallelo. E' un programma che esegue il test di presenza
ed altri controlli su una serie di server. Vorrei che i controlli
fossero
paralleli anziche' sequenziali.
Si puo' con la versione 5.0x o devo passare alla 5.6 ?
Mi puo' bastare il fork o esiste qualche altro artificio di cui non sono
a conoscenza ?
grazie in anticipo per l'attenzione

Massimiliano wrote:

fork genera un nuovo processo, non un nuovo thread.
Dipende comunque da come devi gestire la cosa.
Se hai bigogno di condividere risorse fra le varie attività, e se il carico
di lavoro
e sincornizzazione è particolarmente oneroso meglio usare i thread:
man perlthrtut
altrimenti usa il multiprocess con fork.
Newsgroup: it.comp.lang.perl
Titolo: perl2exe! contraddizione?

Tempo fa avevo chiesto su questo NG se c'era un modo per creare file exe da
script perl senza bisogno dell'interprete perl sul client dove doveva girare
poi il file compilato. Mi č stato suggerito perl2exe ma ho notato che č a
pagamento! Non č una contraddizione per un linguaggio come perl nato e
cresciuto "free"?
Esiste qualche altro compilatore?
Grazie
Enrico

 cresciuto "free"?
  Il Perl viene distribuito con un ambiente di sviluppo in grado di
supportate qualsiasi esigenza derivante dal suo uso. Il Perl nasce su
piattaforme Unix e da` per scontato che su di esse sia presente tutto
l'ambiente, comprensivo di interprete e librerie: la necessita` di
ottenere eseguibili dagli script, quindi, non e` affatto sentita (e
questo spiega perche` esiste un solo "trasformatore" di script in
eseguibili e, per di piu`, a pagamento).
  Inoltre, su una piattaforma Microsoft, il peso del solo intreprete e`
bassissimo (636 KB): inferiore, dunque, a qualsiasi programma sviluppato
in Visual Basic (versioni anteriori alla 6.0) e compilato in eseguibile.
  Lo stesso interprete Perl, infine, e` in grado di generare file in
linguaggio C che possono essere successivamente compilati in eseguibili,
sempre secondo la filosofia Unix che prevede un compilatore C con
relative librerie su ogni host.
  Quale che sia la tua necessita`, pertanto, esiste una soluzione
accettabile. Cosa ti serve?
	Alla prossima,
		Marco

allacciandomi al fatto che il perl può generare sources per la
compilazione in C, poichè non ho molta esperienza in proposito, volevo
chiedere se vale la pena compilare un prg perl in C in termini di
velocità di esecuzione.
La cosa mi interessa particolarmente per le applicazioni cgi
-- 
--------------------------------------------------------------------------
Hosting professionale a prezzi USA ?
http://www.servitelit.com/prezzi.htm
Registrazione domini a Lire 50.000 ? 
http://domini.servitelit.com
--------------------------------------------------------------------------

 ICQ# 33538863
Undergraduate Student of Computer Science at University of Bologna, Italy
SysAdm of 
verdicchio.students.cs.unibo.it
 (130.136.3.134)
	"Information wants to be Open"

non ho avuto il coraggio di provare :)
La dimensione minima e' sempre > di 500k, che "guarda caso" e' proprio la
dimensione dell'interprete perl..... chissa' come mai... :)
-- 
Saluti,
Giancarlo
Newsgroup: it.comp.lang.perl
Titolo: download counter

premesso che se sapessi programmare forse lo scriverei da me... :)
sto cercando un download counter con queste possibilità: richieda nome ed
e-mail al navigatore per identificarlo ed inserisca i dati in un archivio,
generi delle statistiche facilmente leggibili magari attraverso un
interfaccia web, sarebbe comodo anche che potesse gestire l'apertura di file
di altri formati di file oltre al tradizionale ZIP a scelta (senza forzare
il download) altre opzioni sono utili ma non indispensabili.
ne avrò provati 50 e forse più, ma o sono complessi da gestire o inviano
e-mail a destra ed a manca o funzionano quando hanno voglia, all'inizio mi
sembrava un problema di facile soluzione, ma evidentemente ho trascurato
qualcosa. (:
dispongo di mySQL, di php e di perl, ma sto impazzendo per risolvere la
questione.
qualche suggerimento ?
grazie a tutti

        ### Sono sempre RiK0
Dal punto di vista del programmatore, un utente e' una periferica 
che scrive ogni volta che si effettua una richiesta di read.
(Peter Williams)


grazie del suggerimento Enrico, non sono digiuno di programmazione, gli
interpretati poi sono la mia passione (per dirla tutta sono 20 anni che
utilizzo il LISP), il problema è meramente pratico e si basa sulla relazione
tempo/risultati, ho scelto la strada dei vari sourgeforce ecc... proprio per
questo, ma non sono riuscito a trovare la risposta alle mie necessità.
forse non mi rimane che la "programmazione", ma era quello che cercavo di
evitare
un saluto

 evitare
volendo puoi semplicemente vedere quali sono quelli fatti meglio e
modificarli... imho puo' essere che risparmi del tempo :)


Una buona risorsa per applicazioni come quella che cerchi e'
http://www.cgi-resources.com
Eracle
"IlGatto" <lofann...@lofacciopureio.invalid> wrote in message
news:iGRHb.16507$VW.8...@news3.tin.it...


Newsgroup: it.comp.lang.perl
Titolo: Convertire in epoch una data.

Salve.
Scusate qual'e' la sintassi della funzione time() per 
convertire in secs una data?
E' questa la cosidetta conversione in epoch?
Leggendo la documentazione non ho ben capito come
utilizzare la funzione time().
Grazie.
-- 
per rispondere togli <toglimi> dall'indirizzo di posta. 

 utilizzare la funzione time().
Se hai bisogno veramente del valore in epoch di una data qualsiasi, devi usare
la funzione timelocal() del modulo Time::Local.
time non prende argomenti e quindi puo' servirti solo per avere il tempo
attuale.
M^3
-- 
Maurizio M. Munafo' / 
mmmu...@usa.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)
Newsgroup: it.comp.lang.perl
Titolo: Pago 2M/mese x specialista Perl

Sai programmare in Perl? sei un geek/nerd Windows/Unix?
Ti interessa lavorare con me  dalle 11 alle 20 circa in ambiente informale
autogestito per qualche mese pranzo incluso (per il resto si puň vedere...)?
Rapporto scazzato, anarco-enabled ;), niente formalismi.
Dimenticavo, a Bellusco (MI)
ciao
Diego
spaz...@lombardiacom.it
(Lombardiacom non c'entra..)
se ho rotto il 'cappero' con il post-offtopic chiedo venia..



2 M al mese per 8 ore al giorno di lavoro ... mi sa che conviene pulire i vetri
ai semafori


Secondo te quale e' uno stipendio appropriato (intendo in base al mercato
attuale) ?
Sono d'accordissimo con te che 2M/mese sono pochissimi, ma volevo sapere
cosa ne pensate (tu e gli altri del NG).
Si, visto che io non sono dipendente e tanto piu' il Perl (nel lavoro) lo
uso solo per programmazione serverside di siti.
Insomma (oltre ad essere uno studente universitario), lavoro come libero
professionista e faccio i CGI per una ditta "di siti" ed altro. (mi e'
toccato (da poco) imparare anche ASP che non sopporto (il vbscript)).
Alex
P.S. in altri paesi come l'inghilterra programmatori di Perl/PHP vengono
pagati anche intorno ai 10M/mese (appena assunti), ma qui se devo esprimere
un mio parere (visto che ho fatto uno stage di 6 mesi in una ditta molto
famosa nella mia citta') uno sviluppatore Perl/PHP (appena assunto) fa molta
fatica a prendere oltre i 3,5M. (ovviamente io prendevo molto meno come
stagista!)
Poi e' chiaro che come in tutti i campi si puo' fare cariera, ma io ero
curioso di sapere i primi stipendi...

Alex wrote:

Guarda dipende ... io lavoro da tre anni (anche se ne ho solo 21) e penso che
dipenda dal mercato in cui ci si muove.
Generalmente sul mercato italiano delle piccole/medie imprese (nel quale perň
non lavoro piů da circa un anno) penso che 60-80 mila lire l'ora a prestazione
siano un prezzo piů che equo, se ci si comporta da professionisti (e non bisogna
essere dei cervelloni basta metodo ed organizzazione) il che equivale (a sei ore
al giorno di lavoro) a circa 10 milioni al mese lordi e cioč 6 milioni netti.Se
cerchi un impiego con assunzione in regola penso sia difficile superare i 3-4
milioni al mese (a meno che il tuo valore sul mercato in quel momento non sia
particolarmente alto).
Per quanto riguarda il mercato internazionale (io lavoro in una dot com
americana) le retribuzione nette sono ancora piů alte.
Ciao
Newsgroup: it.comp.lang.perl
Titolo: ora...

scusate la domanda probabilemente molto stupida...
come fo a chiedere l'ora?? (mi basta anche solo l'ora senza minuti...)
$time=   ???
grazie
Francesco

 $time=   ???
   $time = (localtime(time))[2]
ma per completezza dai un'occhiata a
   perldoc -f localtime
e a
   perldoc -f gmtime
ciao, marco
--
Marco Cacchiani                                
e-mail:ma...@sirius.pisa.it
Public pgp key:         
http://www.sirius.pisa.it/marco/pgp_public_key.asc
Sirius Servizi Informatici                     e-mail: 
in...@sirius.pisa.it
Parco Teatro Pasolini, 1                       Phone:  +39 (50) 865120
I-56019 - Vecchiano                            Fax:    +39 (50) 860260
(Pisa - ITALIA)                                
http://www.sirius.pisa.it/

$time=   ???
$ora = time
ti torna l'ora in Unix timestamp (numero di secondi dall'1/1/1970). Se
invece usi uno di quest:
@ora = localtime
@ora = gmtime
ti viene tornato un array piu` utilizzabile. Per maggiori informazioni:
perldoc -f time
perldoc -f localtime
perldoc -f gmtime
	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!

 come fo a chiedere l'ora?? (mi basta anche solo l'ora senza minuti...)
... E poi se ti serve solo come timestamp c'e' anche:
$time = localtime
che ti restituisce direttamente una stringa data/ora formattata:
<code>
  $cheoresono = localtime;
  print "$cheoresono\n";
</code>
e lui stampa:
Fri Jul 14 02:01:04 2000

Newsgroup: it.comp.lang.perl
Titolo: proplemi con script

Ciao a tutti,
mi trovo ad avere qlk problema con uno script .pl.
Quando lo lancio (da shell) ricevo l'errore bad interpreter: no such file or
directorypl: /usr/bin/perl
Ora, visto che il path dell'interprete è corretto, visto che nel codice non
ci sono caratteri strani (^M), non riesco a capire cosa possa essere
successo.
Qualche idea? Uso RH 9.0
Per è presente (per -v).
Grazie, sono quasi disperato :-((

 Per è presente (per -v).
Forse Perl non e' installato correttamente o tu non sei autorizzato
ad eseguire alcuni files ?
 Raffaello



Io ho installato laRH 9.0 ed il perl mi risulta presente.
Lo script lo lanci ocome root.
Ho provato ad usare -w alla fine dell'interprete e mi restituisce una serie
di errori

 di errori
E' gia' qualcosa, ci rendi partecipi di questi messaggi di errore ?
 Raffaello

 Ora, visto che il path dell'interprete è corretto, visto che nel codice non
Hai provato a fare whereis perl e vedere se è effettivamente in /usr/bin/perl?
Cmq sarebbe meglio che tu postassi su it.comp.os.linux.development. Qui sei OT.
Ciao,
+------------+ ASCII ribbon campaign ( )
|  KRaLizEc  |  - against HTML email  X 
+------------+              & vCards / \

 sei OT.
la sparo perchè è comune e dà quell'errore, anche se di perl so poco o
nulla: hai fatto lo script su windows e poi l'hai uploadato senza
convertirlo in formato unix...
Deheeeheee
-- 
Emanuele Balla  aka Skull -  Public Key #661E5CBF on 
www.keyserver.com
+----------------------------------------------------------------------+
"And 1.1.81 is officially BugFree(tm), so if you receive any bug-reports
on it, you know they are just evil lies." (By Linus Torvalds)

 convertirlo in formato unix...
Grazie ragazzi, tutte queste cose le ho già verificate :-(
Mi spiegate però per quale motivo non riesco a stampare gli errori al
browser (fatalsToBrowser)?
Mi appare sempre e solo internal server error!!!
Ho RH 9.0 e apache 2.0.40
Newsgroup: it.comp.lang.perl
Titolo: Nuova release di ActivePerl

Ho visto che è uscita una nuova release di ActivePerl (la 5.8.1). Nelle
Release Notes, c'è questa inquietante riga:
  Perl 5.8 is not binary compatible with earlier releases of Perl.
  You have to recompile your XS modules.
  Pure Perl modules should continue to work, subject to the other
  incompatibilities listed here.
Ciò significa che i moduli che utilizzano XS non vanno bene, ma vanno
ricompilati? Se sì, la famiglia Win32::* (tra cui Win32::GUI, che
utilizzo) va ricompilata tutta?
E la domanda finale: vale la pena passare dalla 5.8.0 alla 5.8.1?
Ciao e grazie,
-- 
+--------+ ASCII ribbon campaign ( )
|  kral  |  - against HTML email  X 
+--------+              & vCards / \

 utilizzo) va ricompilata tutta?
qui può e deve risponderti qualcun altro... :-)
by
	- Enrico
--- have fun with 
www.perl.it
 ---

 E la domanda finale: vale la pena passare dalla 5.8.0 alla 5.8.1?
IMHO no, visto che il 5.8.2 source è stato già rilasciato e la sua 
compatibilità binaria ritorna ad essere pari a quella del 5.8.0
Dunque il 5.8.1 in sostanza ha una "feature" che lo rende incompatibile 
con il 5.8.0 . Il 5.8.2 rimette a posto le cose, facendo sì che questa 
feature non crei più fastidio a livello di compatibilità. Dunque tra 
qualche tempo (speriamo in breve) uscirà l'ActiveState con il 5.8.2 .
In effetti la mossa di far uscire il 5.8.1 non è molto azzeccata visto 
che in teoria dovrebbero creare un repository a parte per il 5.8.1 
quando esite già un 5.8.2 che riporta la compatibilità al 5.8.0 .

 Fortunatamente le cose sono state rimesse a posto con la 5.8.2 :-)
Fiuu (sospiro di solievo N.d.A.).
Così basta aspettare che l'ActiveState faccia la release della 5.8.2?
Sto ancora lavorando con la 5.8.0 quindi posso tranquillamente
aspettare...
Ciao,


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

Ringrazio in anticipo chi mi aiuta a trovare l' indirizzo delle FAQ del NG.
Fabio

il 15 aprile 1999 (perl per WinNT) ho posto una domanda molto simile
Risposta: ciccia su questo NG, cerca altrove
(la vera risposta puoi ancora andartela a leggere)
ma forse ciň non č vero.
ciao, antonio


 wrote:
" il 15 aprile 1999 (perl per WinNT) ho posto una domanda molto simile
" Risposta: ciccia su questo NG, cerca altrove
" (la vera risposta puoi ancora andartela a leggere)
" ma forse ciň non č vero.
Quando leggo certi articoli, mi immagino sempre questo Grande Fratello che
distilla tutto quanto viene scritto in un gruppo, lo mette in uno shaker, e
tira fuori automagicamente le FAQ. 
Ma credete che sia davvero cosi`?
.mau.
ps: la FAQ generiche sul Perl (in inglese, mi spiace) si trovano a 
http://www.cpan.org/doc/FAQs/FAQ/html/index.html
Newsgroup: it.comp.lang.perl
Titolo: pattern

Salve
ho una serie di files html dai quali prendere parti da trasferire poi ad un
database mysql.
non riesco pero' a catturare solo la parte che mi occorre.
mi spiego meglio
FILE  HTML
# ********************************************************
html>
 <head>
 <title> Bucatini alla puttanesca  </title>
 </head>
 <body bgcolor =#99FFFF>
 <center>
 <h1> Spaghetti alla puttanesca  <h1/>
 h3> Ingredienti (per 4 persone): <h3/> <br/>
 <h5> 350 gr. di spagnetti, 1/2 kg. di pomodori perini maturi, 50 gr. di
acciughe salate, 50 gr di capperi salati, 100 gr. di olive di Gaeta, 2
cucchiai di concentrato di pomodoro, 3 cucchiai di olio d'oliva, 1 spicchio
d'aglio, 1 peperoncino, sale e pepe. <h5/> <br/>
 <h3> Procedimento: <h3/> <br/>
 <h5> Dissalate le acciughe sotto un getto di acqua. Se le sentite molto
rigide e dure, lesciatele ammorbidire 10 minuti a bagno in acqua.
Disliscatele: dividete in due passando il pollice nella cavita' ventrale per
sollevare un filetto. Staccate quindi la lisca e
 ecc .ecc.
# ********************************************************
da questo file dovrei catturare solo il titolo (bucatini alla puttanesca),
gli ingredienti e il procedimento.
ho provato con i l seguente listato ma non ho ottenuto risultati
# ********************************************************
print "inserire file";
$files=<stdin>;
open(IN, "+< $files") || die("Errore nell'apertura del file '.\n");
while
N>){ 
if ($tit =~ /title/) { 
 $noric2 =  ~ / . / ;
 print $noric2;  #(verifica che testo ha catturato)
    } 
 }
# ********************************************************
Grazie in anticipo

#1/1
[2] 
http://search.cpan.org/~ovid/HTML-TokeParser-Simple-2.2/Simple.pm
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it

if ($tit =~ /title/) { 
Se vuoi quello che si trova tra <title> e </title> devi usare qualcosa
del tipo:
$titolo="";
if($testo =~ /<title>([^<]*)<\/title>/){
	$titolo=$1;
}
Ricerchi qualcosa che:
1) inizia con <title>
2) e' seguito da qualunque numero di caratteri tranne il "<", cioe' si
ferma all'inizio di </title>, ([^<]*)
3) finisce con </title> 
In $1 ti ritrovi il valore di ([^<]*)
Regex scritta in fretta e non testata, ma il concetto e' quello.
'bye

 if($testo =~ /<title>([^<]*)<\/title>/){
Quando il pattern da cercare include barre, io preferisco usare una
notazione diversa:
  if ($testo =~ m#<title>([^<]*)</title>#) {
evitando l'escaping il tutto mi sembra più chiaro.
Ciao

Grazie a tutti per le dritte, ma purtroppo il listato proposto non funziona.
ciao

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

Per eseguire script perl su Win98 con Personal Web server č
necessario rinominare l'estensione del file da htm in shtm?
C'č qualche modo per evitare questo inconveniente?
Grazie anticipato a tutti?
email 
fugg...@tiscalinet.it
* Sent from AltaVista 
http://www.altavista.com
 Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping.  Smart is Beautiful

 cerchero' un'altra donna dentro ai sogni di Tarzan...
Newsgroup: it.comp.lang.perl
Titolo: Conversione di un dizionario per Crimson editor

Siccome sono nuovo del newsgroup vorrei inanzitutto salutare tutti 
coloro che vi partecipano.
Ora provo ad esporvi, nel modo più chiaro possibile il mio problema.
Io uso come editor di testo Crimson editor, mi trovo molto bene, però 
fa lo spellcheck solo con il dizionario inglese, ho provato a cercare un 
dizionario italiano ma senza fortuna.  Dopo aver aperto il file del 
dizionario mi sono accorto che non è  poi così  complicato la struttura 
del file:  un elenco di parole seguite da spazi, tutto qui.
Ho quindi aperto il file del dizionario utilizzato da Firefox che deriva 
da OpenOffice e ho visto che la sintassi è leggermente diversa: parole 
su singole linee seguite opzionalmente da parametri che indicano la loro 
natura (verbo, sostantivo ecc).
Una cosa simile:
abito /S
abete /SAT
abbaiare /VTSS
(è solo un esempio)
ora credo che per convertire il dizionario in uno usabile anche con il 
mio editor mi basterebbe  eliminare tutte le istanze /*******\n  dal 
file del dizionario di Firefox.
Problema, di farlo a mano non se ne parla nemmeno, usando le espressioni 
regolari di Crimson Editor non mi riesce di modificare  i \n (nuova 
riga). Ora vorrei sapere con Perl è possibile ottenere quello che voglio ?
Ho provato anche con il comando sed contenuto in Cygwin ma non riesco a 
cavarne nulla.
Grazie per l'attenzione
Ciao
-- 
Il mio Blog - 
http://www.gialloporpora.altervista.org/Blog
* Faq di /it-alt.comp.software.mozilla/: 
http://snipurl.com/mozfaq

Risposta al messaggio di gialloporpora :

Ok ho risolto non serve che sostituisca i line break con uno spazio 
visto che mi fa lo spell check correttamente anche senza questa modifica.
Grazie e scusate il post.

Newsgroup: it.comp.lang.perl
Titolo: Propblemi perl

Ragazzi ho un problema in pratica dato che ho realizzato un gioco in
Flash5.0 , e voglio creare dei punteggi, ho due file perl, uno per l'ivio e
uno per la ricezioni, il file usato per scrivere e un semplice file di
testo, *.txt, cmq ragazzi dove devo metterli questi file? dato che sto su un
server di aruba, e le cartelle sono "cgi-bin" dove e' possibile solo leggere
e "public" dove si puo' scrivere e leggere, l'ultimo problema, che percorso
devo mettere ai file inziali perl? cioe' dove c'e' scritto  #!/usr/bin/perl
Grazie e saluti a tutti
Paolo Kobrass
Paolo...@kobrass.it
www.kobrass.it

Salve,
ho un account dove è presente un modulo non ben identificato.
Dovrebbe essere un modulo Prl per far girare gli script Asp
su server con linux.
Ho provato a farci girare qualche script Asp, ma esce errore 500.
Qualcuno sa come fare ad usare questo modulo?



 Ho provato a farci girare qualche script Asp, ma esce errore 500.
ma gli script che hai utilizzato sono scritti in Perl?
se il modulo è quello e stai cercando di farci girare il VBScript
(o il JScript), sei totalmente fuori strada.
cheers,
Aldo
__END__
$_=q,just perl,,s, , another ,,s,$, hacker,,print;

 ha scritto nel messaggio
news:aclfbg$uaq$1...@stargate1.inet.it...


e che non so a cossa possa servire fare script in perl dove c'è pure asp, 
serve perchè se qualcuno vuole usare tecnologia ASP con il proprio
linguaggio di programmazione preferito, il Perl, lo può fare.
Ovvero, puoi accedere in perl agli oggetti esposti dalla tecnologia
ASP.
Ci sono molte cose che non si capiscono di acchito ma che hanno buone
ragioni di essere ...
Ciao

 che si può scrivere tutto direttamente in perl.
Giusto come chiarimento:
<HTML>
<script language='VBScript' runat='server>
for i = 1 to 10
    response.write "ASP in VBScript"
next
</script>
<script language='PerlScript' runat='server'>
for (1..10) {
    $response->write ("ASP in PerlScript");
}
</script>
</HTML>
Non mi frega se la sintassi di cui sopra è corretta ma l'esempio calza per
farti capire che Active Server Pages non è un linguaggio, è un metodo!
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: Sistema di login con cookies...

Ciao amici,
anche se io intendo implementarla in Perl, vorrei chiedervi quale e'
secondo voi la pratica piu' corretta per usare i Cookies per la
"certificazione" di un certo utente... mi spiego meglio:
Io ho una serie di CGI dove l'utente puo' aggirarsi liberamente solo
se autorizzato. Quindi deve essere sempre controllata la sua
autenticita' giusto. Tuttavia se ad esempio io faccio un CGI che
verifica un utente e solo dopo gli permette l'accesso a dei CGI
successivi se un utente smaliziato conosce i parametri e gli indirizzi
di questi CGI puo' andarci direttamente! Giusto?
D'altra parte non posso mica chiedere la password ad ogni link e tanto
meno posso passarla come parametro ogni volta in "chiaro" (anche se
molti lo fanno: orrore!).
La soluzione penso siano i Cookies. Il mio dubbio era:
Quali sono le fasi dell'autenticazione?
Io avevo pensato ad una cosa del genere:
1) L'utente si certifica inserendo USER e PASSWORD in un modulo
2) Un CGI verifica il tutto
3) Se l'utente non e' autorizzato lo manda a quel paese
4) Se l'utente e' autorizzato viene creato un cookie associato a lui
con una certa scadenza...
5) da questo momento i prossimi CGI controllano la presenza del cookie
6) Ne caso il cookie non ci fosse o fosse scaduto... di nuovo mandiamo
l'utente a quel paese.
7) Se l'utente chiede l'esplicito LOGOUT cancelliamo il Cookie
Che ne pensate?
Ciao
Dark "bikkotto" Wave

 un file dell'ultimo accesso dell'utente).
E' un sistema che usiamo anche noi ma presenta dei difetti. Per esempio, per
quanto
riguarda la codifica dell'IP nel cookie, molti servizi
usano un sistema di proxy in cluster, per cui due richieste successive
possono
venire da due IP diversi.  Per esempio, AOL usa questo sistema, e qua negli
USA non
vuoi tagliare fuori decine di milioni di utenti.
Una tecnica potrebbe essere prendere una parte dell'IP, la stringa che
descrive il
browser (HTTP_USER_AGENT) insieme ad un numero casuale che
memorizzi sul server, poi fai l'MD5 di tutto quanto e lo usi come sessione.
Come giustamente dicevi tu poi memorizzi anche sul server e poi controlli.
Pero' anche qua, devi stare attento, perche' se il tuo script gira dietro
una foundry
(cioe' un sistema di load balancing) non e' garantito che il client si
colleghi allo stesso server
la volta successiva.
In questa maniera comunque si puo' fare anche che il cookie possa essere
utilizzato
una volta sola (e quindi reimpostato ogni volta).
Newsgroup: it.comp.lang.perl
Titolo: Documentazione perl

Salve sono uno dei nuovi newbie e volevo sapere se esiste una decente
documentazione su internet che riguardi l'argomento possibilmente in
italiano.
Ho dato uno sgurdo in giro ma ho trovato solo documentazioni sterili che
riguardano la spiegazione delle varie stringhe ma niente che mi spieghi
l'applicazione pratica. Esempio: (forse č un'eresia)
So che specificando un array alla fine posso richiamare a scelta un elemento
dell'array........e a che me serve? :)
Ok ho imparato cosč un array ma alla fine che una guida che mi dice cosa
posso creare con queste conoscenze o devo solo darmi uno sguardo ai vari
prog gią creati e capire da quelli?
Erazie tante

 Erazie tante
 ciao,
 anch'io sono nuovo al perl e fin'ora i documenti migliori che ho trovato
 sono la sezione dedicata al perl dell'ottimo ed enciclopedico 'Appunti di  
Informatica Libera'
 
http://it.tldp.org/AppuntiLinux/a2387.html#almltitle4195
 
 e questo pdf(
http://www.isinet.it/~marco/perl/perl.pdf
) il cui primo
capitolo fra l'altro è un intoduzione alla programmazione in generale.
 Infatti,se ho ben capito,la tua seconda domanda non riguarda il perl in
particolare,bensi a che cosa seve usare un array e quali ne sono i
vantaggi(cosa che riguarda un gran numero di linguaggi).
Sempre se ho ben capito,la risposta è che in un array le variabili sono
indicizzate,
cioè:invece di riferirti a loro con un nome($x ad esempio) ti riferisci a
loro
tramite un indice che puoi memorizzare e manipolare in una variabile il che
ti rende la cosa più dinamica e potente.
 

Ti ringrazio per il link a quella guida. L'avevo cercata ma tutti link che
trovavo non funzionavano. La mia domanda era un pň piů generale e non
riguardava in particolare gli array. Fino ad ora ho imparato come far uscire
sullo schermo semplici frasi,  far aprire files e farli eseguire, e poi? Sto
imparando questo nuovo linguaggio per il solo gusto di apprendere e non so a
chi sia indirizzato. Magari serve se hai un web server o magari pubblichi
pagine internet. A me piace capire i cgi script ma anche leggendo intere
guide sul perl non ne sono riuscito a capire il funzionamento (dei cgi).
Sono un pň perplesso.........che stia sbagliando guide?

Newsgroup: it.comp.lang.perl
Titolo: my sql and perl

ciao a tutti ho un piccolo problema (sicuramente piccolo per voi) con mysql
ho costruito un semplice db con all'interno una semplice tabella di nome
"nomi"  e volevo farla interagire con perl. Essendo alle prime armi non
riesco a trovare una soluzione facile da capire ed efficiente allo stesso
tempo, potreste aiutarmi cortesemente a costruire un listato di poche riche?
grazie anticipatamente

 a costruire un listato di poche riche? grazie anticipatamente
Ciao,
bastava fare una semplice ricerca su google. Cmq per un listato di
esempio prova a guardare qui:
http://www.euronia.it/main.php?p=articoli&articolo=17
E' il quarto risultato della ricerca mysql perl e mi sembra abbastanza
capibile.
Ciao,
-- 
+--------+ | ASCII ribbon campaign ( ) | 
www.autistici.org/kral
|  kral  | |  - against HTML email  X  |
+--------+ |              & vCards / \ | my key id = 0x7C946947
Newsgroup: it.comp.lang.perl
Titolo: AIUTOOOO

Esiste un compilatore del perl per windows 95?????
Rispondete vi supplico!!!

Rispondete vi supplico!!!
http://www.activestate.com/ActivePerl/download.htm
saluti
MArio

Newsgroup: it.comp.lang.perl
Titolo: [RM] Sistemista Linux per gestione web server

Omnibit srl ricerca con la massima urgenza un sistemista linux per
gestione web server.
Requisiti: Conoscenza Linux, Apache, Front Page server, perl.
I candidati interessati potranno inviare il proprio curriculum via fax
al numero 06 23239504 oppure via e-mail all'indirizzo
lav...@euroweb97.com
.
-- 
Omnibit srl
Ufficio direzione del personale
E-mail: 
lav...@euroweb97.com

 gestione web server.
Usare it.comp.linux.annunci no, eh?
-- 
Pierluigi De Rosa (
tho...@durin.khazad-dum.net
).
<<      LINUX: the choice of a GNU generation     >>
<<   For my real address... ask the Balrog.       >>
* Sostenete la Lega per la Soppressione dei Troll *

 Usare it.comp.linux.annunci no, eh?
Toh, Thorin! Da un po' che non ci si vede su un NG! Anche se qui su
it.comp.lang.perl è OT parlare di it.comp.linux.annunci!!!
;-))))))))))))))
Daaaaai che sto scherzando, probabilmente non ti sei accorto del
crosspost!
Bye
Edo

;-))))))))))))))
Ha ti sei dato anima e corpo al Perl ?
Ottimo, cosi' mi mandi la 1.0 di quel tuo programma :-)

 Ottimo, cosi' mi mandi la 1.0 di quel tuo programma :-)
Tra un po' lo rilascio come 'stable'. Intanto dimmi ... hai mai dato
un'occhiata alle versioni precedenti?
(rispondimi in mail, qui siamo completamente OT!)
Ciao
Edo

 Ottimo, cosi' mi mandi la 1.0 di quel tuo programma :-)
te che non sia lo stesso Edo, comunque posso sollecitarlo io.
Ciao
P.S.: come faccio a saperlo? l'indirizzo mail è diverso.
-- 
Non c'è più forza nella normalità: c'è solo monotonia.

 P.S.: come faccio a saperlo? l'indirizzo mail è diverso.
Ops, grazie per avermelo fatto notare!! Cmq, sono io! C'erano forse
dubbi?
Newsgroup: it.comp.lang.perl
Titolo: Numero progressivo e data corrente

Sono finalmente riuscito a scrivere una CGI in Perl su Unix che
acquisisce con una form delle informazioni via Web, salvandole in un
file di testo su Apache.
Ora però vorrei che ad ogni singolo record di detto file di testo
venisse assegnato automaticamente un numero progressivo e la data
corrente di inserimento.
Come posso fare? Dove posso trovare queste informazioni?
Ringrazio anticipatamente e vi saluto.
Roberto

 Come posso fare? Dove posso trovare queste informazioni?
Per il numero progressivo potresti semplicemente contare le linee del file e
scriverle nel record successivo, sempre che non si cancellino records, se
invece vuoi evitare problemi con le cancellazioni, allora puoi leggere il
numero di record dell'ultima riga e aggiungere 1 nella successiva.
Per la data, leggiti perldoc -f time che ti dovrebbe già bastare. Puoi poi
scegliere se scrivere nel file il valore di time() e convertirlo poi quando
ti serve in formato data, oppure scrivere il formato data convertito, ma poi
dovrai riconvertirlo in formato time se devi farci su dei calcoli.
ciao
--
perl -MLWP::Simple -e "getprint(' 
http://perl.4pro.net
 ')"

Grazie Domizio!

 corrente di inserimento.
Usa la funzione time per avere la data... ma usalo anche come numero
progressivo!!! Quello cambia ad ogni istante ed e' sempre crescente
nonche' univoco!!!.
Ciao,
Dark Wave

nonche' univoco!!!.
Non basta. Una granulosità di un secondo è un po' troppo grossolana
per dare garanzie sufficienti che il valore di due scritture successive
sia effettivamente univoco. Conviene usare una funzione tempo più fine
(Time::HiRes o simili), o aggiungere qualche correttivo: un elemento
casuale, o progressivo o altro. Il problema è tutt'altro che nuovo, e non
dovrebbe essere difficile trovare qualche algoritmo preconfezionato da
adattare. Mi pare che ci siano anche un paio di moduli perl che possono
servire allo scopo.
Questo sempre nel caso che un puro e semplice numero progressivo non sia
sufficiente (generazione contemporanea dei dati su sistemi diversi e altro).
Nel caso specifico, mi pare di capire che il numero di riga faccia già bene
il lavoro.
Ciao.

 nonche' univoco!!!.
Questa è una bella idea se ti serve un numero di serie! Non ci avevo mai
pensato, anche perché mi intimoriva la quantità di cifre :-). Se invece il
numero dev'essere progressivo, magari non va tanto bene, a meno che non sei
sicuro di produrre un nuovo record sempre e ad intervalli regolari di
esattamente 1 secondo :-))))


 sia effettivamente univoco.
già... e non avevo pensato nemmeno a questo!
:
-) ehhhh.... l'età, l'età... comincio a invecchiare (almeno detto così fa
pensare che sono giovane :-))


scopo.
Sys::UniqueID (non proprio il massimo), e Data::UUID (che però non è
disponibile precompilato per Windows).
Sys::UniqueID può venir comodo, in mancanza di fantasia, per generare un
Message-ID.
Ciao.

Grazie a tutti per la valanga di utilissime informazioni!
Roberto.
Newsgroup: it.comp.lang.perl
Titolo: Can AWK be used in Perl??

New to Perl and want to strip the end off a string [sure there is an easy
way to do it in Perl :-) ] can use AWK to do this easily but not sure if AWK
can be used with Perl - does a module have to be loaded??
Thanks,
Steve.

Steve,

  I am pretty sure you can understand that in newsgroups belonging to
the Italian UseNet hierarchy ($newsgroup_name=~/^it\./) the widely used
language is Italian and not English, thus, please, re-ask your question
in this language or try an international newsgroup (such as
news:comp.lang.perl.misc).
	Alla prossima,
		Marco

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

Newsgroup: it.comp.lang.perl
Titolo: Domanda da Neofita

Salve a tutti del news !!
Volevo sapere dagli esperti il metodo per chiamare uno
script da dentro una pagina HTML, SENZA usare i SSI
(exec & include), per i server non provvisti di tale funzione.
Grazie
George

 Grazie
Prego.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 Prego.
Perche' ?!?!??! 
Il PERL e' forse un linguaggio a se' stante ?!!?!?!
Con il web non c'entra niente ?!?!?!?!
Se e' cosi', qual'e' il news "giusto" allora ?!?!?!
Grazie
George

 wrote:
: Perche' ?!?!??! 
: Il PERL e' forse un linguaggio a se' stante ?!!?!?!
Si`.
: Con il web non c'entra niente ?!?!?!?!
non necessariamente.
: Se e' cosi', qual'e' il news "giusto" allora ?!?!?!
it.comp.www.cgi.
ciao, .mau.

 Se e' cosi', qual'e' il news "giusto" allora ?!?!?!
it.comp.www.cgi
Maurizio


Con il web non c'entra niente ?!?!?!?! 
Certo, ti riporto solo due date tanto perche' cosi' ti rendi conto di che stai
parlando e cosi' accresci un poco la tua cultura generale.
1987: Larry Wall rilascia la versione 1.0 del perl
1990: Tim Berners-Lee scrive il primo client e il primo server web
-- 
Saluti,
Giancarlo

Newsgroup: it.comp.lang.perl
Titolo: arrotondare dimensione file

in una variabile ho la dimensione di un file in byte:
$size = file size
Vorrei arrotondarla in Gb Mb Kb e semplici byte
avete qualche dritta?


Usa (s)printf, con un'appropriata divisione per multipli di 1024.
Guarda questo esempio e fatti venire delle idee:
#!/usr/bin/perl -w
use strict;
my $filename = "$ENV{HOME}/dl/KNOPPIX_V3.7-2004-12-08-EN.iso";
my $dimensione = -s $filename;
printf    "bytes: %12.2f\n"
         . "KB   : %12.2f\n"
         . "MB   : %12.2f\n"
         . "GB   : %12.2f\n",
         $dimensione,                       # byte
         $dimensione / 1024,                # KB
         $dimensione / (1024*1024),         # MB
         $dimensione / (1024*1024*1024) ;   # GB
__END__
bytes: 732942336.00
KB   :    715764.00
MB   :       698.99
GB   :         0.68
Ciao
gmax
-- 
   ____ ____  _____ _   _
  / _  |    \(____ ( \ / )
( (_| | | | / ___ |) X (
  \___ |_|_|_\_____(_/ \_)
(_____|
MySQL Certified Professional
Sapere, saper fare, fare, far sapere
http://gmax.oltrelinux.com
Newsgroup: it.comp.lang.perl
Titolo: esperti in PERL cercasi in LIGURIA

ANNUNCIO ECONOMICO
Cerco esperti in PERL, o linguaggi capaci di creare dei metamotori, per
prendere LEZIONI, residenti nella tratta GENOVA - CHIAVARI o che possono
spostarsi.
Telefonare ai seguenti numeri: 010 876080 010 8370404 .
Nella seguente fascia oraria: 19:30 - 22:30.
Spedire curriculum a: 
f.r...@inwind.it
 (siti fatti, grado di conoscenza,
ecc....)
!!! NON RISPONDERE AL NEWSGROUP !!!.....NON LO LEGGO MAI....MA TELEFONARE
Francesco
P.S. L'età non mi interessa ma solo il grado di conoscenza......rispondo a
tutti coloro in grado capaci di insegnarmi a programmare.


Newsgroup: it.comp.lang.perl
Titolo: analisi di una stringa

1- Ho la necessita' di sapere se in una stringa sono presenti caratteri
diversi da [a-z] [0-9]
2- In una stringa il primo carattere non deve essere un numero, in perl
c'e' qualcosa che mi permetta di fare una cosa del genere:
if(substr($stringa,0,1)) e' numero qualsiasi(0-9)?
al posto di fare manualmente
if((substr($stringa,0,1)) eq "0")
if((substr($stringa,0,1)) eq "1")
if((substr($stringa,0,1)) eq "2")
.......
sono alle prime armi per quanto riguarda il perl, qualcuno sa postarmi 2
righe di codice che eseguano questi controlli?
Grazie
Roberto

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

 diversi da [a-z] [0-9]
  if ($stringa =~ tr/[a-z0-9]//c)
   {
     print "Hai osato usare un carattere proibito!!!!\n";
   }
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 righe di codice che eseguano questi controlli?
2 righe alla lettera...:-).
Alex

if(substr($stringa,0,1)) e' numero qualsiasi(0-9)?
if ((substr($stringa,0,1)) =~/\d/)
o meglio ancora
if ($stringa,0,1 =~/^\d/)
Controlla perlre nella documentazione del perl
Ciao
Andrea Busia
No Spam, Grazie.

if ($stringa,0,1 =~/^\d/)
cos'hai contro << $stringa =~ /^\d/ >> ? :-)


cos'hai contro << $stringa =~ /^\d/ >> ? :-)
Cancella qui, cancella lì mi è rimasto un "binario" nella tastiera.
:-P


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

Perche' non stampa un piffero
open(RESULTPAGE,"<../data/rogai-resultpage.tmpl") or die 'File non
trovato';
@righe = <RESULTPAGE>;
close(RESULTPAGE);
foreach $riga (@righe)
{
	print @riga;
}
Se invece scrivo
print @righe;
funziona
Sicuramente e' una c...za
Grazie
-- 
Giancarlo Martini
EMail 
mcg...@mcgsoft.net

 Grazie
La prossima volta, usa 'perl -w', che errori di questo genere te li indica.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 
Grazie ..... piu' ci si fissa nelle cose .... 
che si arriva a un punto in cui anche le cose piu' evidenti
non si vedono

	print @riga;
^^^^^^^^^^^^^^^
print $RIGA
non è un'array
Ciao
Andrea Busia
No Spam, Grazie.

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

Come faccio a modificare il valore di un campo hidden di un form?
Seva

 Seva
Lo puoi fare con javascript, ma hai sbagliato NG.

ZioKiller wrote:

Se ho postato la domanda qui è perchè pensavo di poterlo fare in perl.
Comunque ho risolto.

Newsgroup: it.comp.lang.perl
Titolo: R: Avere l'IP del browser che chiama

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

E se veramente č cosě....come fare per prelevare questo dato?
E` sicuramente causa del web server. Forse PWS fornisce l'IP in una variabile
con nome diverso, ma se non lo fa non c'e` modo in cui tu possa recuperarlo.
	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!