mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: Controllo dei campi

In ogni Form Mail che si rispetti viene inserito il codice per il controllo
della e-mail (ovvero 
no...@dominio.it
).
Si puň inserire anche una sub che avvisa l'utente di riempire i campi
richiesti se sono vuoti, ma qualora ci si posiziona su un campo e si
inserisce uno spazio, quello spazio viene considerato come un carattere
quindi come un testo valido.
E non deve essere cosě. Dove si puň reperire del codice che mi permette di
analizzare il testo di un campo e di individuare anche altri caratteri non
consoni ad un campo nome (ex nome:"'?@^\/ecc")?
Grazie, spero di essere stato abbastanza chiaro altrimenti confido nella
vostra intelligenza.
Ciao a tutti e grazie.

consoni ad un campo nome (ex nome:"'?@^\/ecc")?
Io scriverei (e non copierei da qualcunaltro...) qualche bella regexp per dare
delle regole ai formati dei vari campi, tipo
/^[A-Z,a-z,.,-]+\@(\w+\.)+\w{2,3}$/ 
per vedere se un email e' valido, per un nome e cognome potrebbe andare
qualcosa del tipo 
/^(\w+\s?)$/ 
etc...
-- 
Saluti,
Giancarlo

consoni ad un campo nome (ex nome:"'?@^\/ecc")?
Puoi utilizzare un regular expression come quella che gia` ti ha suggerito
qualcun altro. Tuttavia forse non ne vale la pena: il controllo serve piu`
che altro per evitare che qualcuno dimentichi di riempire qualche campo.
Se invece l'utente non vuole mettere il nome, comunque riuscira` ad eludere
il controllo scrivendo cosa come:
fasfwefwe
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!

Newsgroup: it.comp.lang.perl
Titolo: uso di $ENV per capire da dove si proviene...

Ciao
Qualcuno sarebbe cosě gentile da suggerirmi come riuscire a capire da dove
proviene un utente in visita sul mio sito ?
Tramite l'uso della variabile $ENV{...} riesco a reperire il suo IP, ma mi
servirebbe invece sapere se arriva da siti tipo Kataweb, Virgilio ecc.
Grazie
Marco

servirebbe invece sapere se arriva da siti tipo Kataweb, Virgilio ecc.
In $ENV{'HTTP_REFERER'} vedi la pagina in cui si trovava il client in
precedenza. Non funziona proprio sempre pero`.
	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!

Se vuoi sapere il provider, penso che bisogna fare un comando tipo "PING n° 
IP" e poi trovare il sito che corrisponde, oppure avere dei numeri IP di 
alcuni provider in un hash: $provider{"123.456.789.101"}{"LIBERO"};
Ciao
-- 
Posted from 
community5.interfree.it
 [213.158.72.35] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 di alcuni provider in un hash: $provider{"123.456.789.101"}{"LIBERO"};
E uno si riinventa il sistema DNS ex novo!
-- 
Saluti,
Giancarlo

assolutamente sbagliato!
;-)))

Newsgroup: it.comp.lang.perl
Titolo: Problema di Sintassi

Salve a tutti
dopo la presentazione passo alla mia prima domanda, banale sucuramente, ma al momento sono ancora un novellino.
Vorrei alcuni chiarimenti in merito a
print <<MIOTERMINATORE
testo
testo
testo
MIOTERMINATORE
oppure 
print <<"MIOTERMINATORE"
testo
testo
testo
MIOTERMINATORE
oppure
print <<"MIOTERMINATORE'
testo
testo
testo
MIOTERMINATORE
La seconda versione esiste?
La differenza tra virgolette singole e doppie permetterebbe in un caso la non espansione/interpolazione delle variabili vero?
Serve il ; dopo l'ultimo MIOTERMINATORE?
cioè
print <<MIOTERMINATORE
testo
testo
testo
MIOTERMINATORE;
Grazie
gallus

MIOTERMINATORE;
No, altrimenti non riconoscerebbe MIOTERMINATORE. Serve dopo l'istruzione,
cioč o scrivi:
   print <<"MIOTERMINATORE"
   testo
   testo
   testo
   MIOTERMINATORE
   ;
   print "questa č un'altra istruzione";
o (molto meglio) scrivi:
   print <<"MIOTERMINATORE";
   testo
   testo
   testo
   MIOTERMINATORE
   print "questa č un'altra istruzione";
Ciao.

Sě.
Be', naturalmente il delimitatore deve essere almeno lo stesso:
    print <<'MIOTERMINATORE';
Ma questo era evidentemente un errore di battitura.
Ciao.

Newsgroup: it.comp.lang.perl
Titolo: Hash=>Array

E' possibile assegnare ad un elento di un hash un array e poi modifacare,
con push per esempio, l'array?
se sě, come?
@forca=(12,45,67);
%SToT= (
  'cont'=>@forca,
  'secondo'=>22,
  'terzo'=>33
  );
P.S.Mi serve per gestire i file dbm.
Ciao, TaigeR

 P.S.Mi serve per gestire i file dbm.
Che c'entra? In ogni caso, mettere strutture complicate dentro dei dbm e'
complicato. Devi 'appiattirle' prima o usare un package serializzatore come
Storable o FreezeThaw. Di fatto finisce che devi usare MLDBM (cosa non
immediata).
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 Poi puoi fare push su @$SToT{cont} (se non sbaglio).
Non proprio, devi usare @{ $SToT{cont} }.
@$SToT{cont} equivale a @{ $SToT }{cont}, che nel caso in questione non
denota nulla giacchè $SToT non è un reference a un hash.
Se invece lo fosse... ossia se:
 $SToT = \%hash;
@$SToT{cont} equivarrebbe a @hash{cont}.
Max

 denota nulla giacchč $SToT non č un reference a un hash.


 newsgroup!
Come avevo detto, devi scaricarti il modulo MLDBM da CPAN. Prendi pure
Data::Dumper, Storable e FreezeThaw, cosi' puoi decidere quale usare per la
serializzazione.
La pagina di manuale di MLDBM mi sembra abbia dettagli sufficienti.

Newsgroup: it.comp.lang.perl
Titolo: moduli, cookies, SSI





salve,


sono un neofita e quindi mi scuso anticipatamente se le 
mie domande possono essere anche banali.


 


I cookies sono dei semplici file .txt dove vengono 
immagazzinate informazioni utili e sempre disponibili all'utente?


 


Cosa sono i moduli? come si usano? qual'è la 
sintassi per richiamarli e quindi usufruirne nei listati?


 


Cosa è SSI? 


 


e poi un'ultima domanda (scusate se è poco):


c'è una istruzione o una funzione che richiama una pagina 
.html statica per poi visualizzarla senza ricorrere a cicli e (a volte) 
innumerevoli "print"?


 


grazie.


 


 









Usa il doublequote :


sintassi :  PRINT 
QQ~


               
<HTML>.....


               
....


               
<\HTML>


                
~


 


praticamente il comando QQ mette tutto quello 
che e' contenuto tra i caratteri che gli indichi (in questo caso ho usato la 
tilde ~ ma poteva essere qualsiasi altro carattere....) tra DOPPI 
apici.


Ciao. 




"Giorgio Mecarelli"
 ha scritto nel messaggio 
    <000a01bfde2c$d7327a00$d3602397@giorgio>...


Newsgroup: it.comp.lang.perl
Titolo: Unix: come trovo i DBD installati?

Qualcuno sà dirmi come si fà a sapere che moduli dbi:dbd sono installati 
su un server unix remoto? Esiste su unix qualcosa simile al 'ppm' per 
dos?!?
Grazie in anticipo
Tac

 dos?!?
 use ExtUtils::Installed;
 my $inst = ExtUtils::Installed->new();
 print join "\n", grep { /^DBD::/ } $inst->modules();
Max

dos?!?
Se ti serve solo un elenco dei driver DBD, allora è semplicissimo c'è
la funzione DBI->avaiable_drivers  (man DBI), se invece vuoi una cosa
tipo PPM che ti fa vedere tutte le librerie installate allora dai
un'occhiata alla manpage di ExtUtils::Installed.
--
Rimuovi i caratteri maiuscoli dall'indirizzo e-mail per ottenere quello reale

Newsgroup: it.comp.lang.perl
Titolo: DBI $dbh->prepare(q{SELECT .... }); question????

What does it means "q" in:
$dbh->prepare(q{SELECT .... }); 
I'm talking about DBI.
where can I get more informations about DBI functions?
I saw CPAN but I did not find nothing!
Thank you in advance, Mario.

 I saw CPAN but I did not find nothing!
At 
http://dbi.perl.org/
-- 
Jeff

 wrote in message
news:20011106.143525...@localhost.localdomain...

q{} (or q[], q##, etc) is just an alternative to '' (single quotes)
qq{} is alternative double-quotes.
$dbh->prepare( q{SELECT * FROM table WHERE field = 'something'} );
is probably avoiding the backslashes in
$dbh->prepare( 'SELECT * FROM table WHERE field = \'something\'' );
-Steve
Newsgroup: it.comp.lang.perl
Titolo: HELP mail...

Mi trovo in una situazione di emmergenza cambiando server non si riesce ad
far fungere
il prog per le mailing.
volevo provvisoriamente farmi un programmino per inviare a una lista
(piuttosto lunga)
il problema è che non ho mai avuto a che fare con l'invio mail in perl!
qualcuno mi da un semplice  esempio di invio email?
Non cerco un prog. per gestirle...
solo la base, il minimo necessario  per inviarene una...
poi mi arrangio con i miei scarsi mezzi!
Grazie
F.

\n";
print MAIL "Subject: Test\n\n|";
print MAIL "Questo e` il messaggio!";
close (MAIL);
E` tuttavia raccomandato l'uso del semplice e potente modulo:
Mail::Mailer
ma come si usa " Mail::Mailer "
... vabbe' mi accontenterò
dell'esempio
Grazie.
F.

dell'esempio
Preleva il modulo dal CPAN (
http://search.cpan.org
) e leggi la
documentazione. ;)
        Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!
Newsgroup: it.comp.lang.perl
Titolo: variabile env

Buonasera a tutti,
sto iniziando adesso a conoscere il perl, quindi mi scuso della domanda che
sembrerà non al'altezza della newsgroup.
Sto provando a fare uno script che richiamato da una pagina HTML mi aggiorni
un file con delle informazioni statistiche su chi vede la pagina.
In particolare ho notato che alcune variabili ENV si aggiornano bene, mentre
altre sono vuote.
La cosa che non riesco a capire è la seguente:
la variabile ENV HTTP_REFERER si riempie con il nome della pagina che
richiama lo script mentre invece credevo si riempisse con il valore della
pagina precedente a quella che richiama lo script.
Chi mi da un'aiuto?
Saluti a tutti

 writes:
Luca> Buonasera a tutti, sto iniziando adesso a conoscere il perl,
Luca> quindi mi scuso della domanda che sembrerà non al'altezza della
Luca> newsgroup.
Luca> Sto provando a fare uno script che
Luca>                                    richiamato
Luca>                                               da una pagina HTML
"richiamato" come?
Luca> mi aggiorni un file con delle informazioni statistiche
Luca> su chi vede la pagina.
Luca> In particolare ho notato che alcune variabili ENV si aggiornano
Luca> bene, mentre altre sono vuote.
Luca> La cosa che non riesco a capire è la seguente: la variabile ENV
Luca> HTTP_REFERER si riempie con il nome della pagina che richiama lo
Luca> script mentre invece credevo si riempisse con il valore della
Luca> pagina precedente a quella che richiama lo script.
Luca> Chi mi da un'aiuto?
Luca> Saluti a tutti
Da quello che ho potuto capire, dopo un po' di perplessita` sul tuo
concetto di "informazioni statiche"...
Lo script e` chiamato con qualcosa tipo <img src="
script.pl
">
o un simile link valorizzato al caricamento della pagina.
Il referer da` una motivazione della richiesta HTTP.
Cosi` il referer della pagina e` quello che ti aspettavi, ma che
non sfrutti da perl perche` la pagina e` un file html statico,
mentre il referer del particolare (lo script) della pagina
e` la pagina statica che lo indica.
Saluti,
MARco
-- 
x(t),y(t) = th(3t-34.5)*e^[-(3t-34.5)^2]/2-4.3+e^(-1.8/t^2)/(.8*atg(t-
3)+2)(t-1.8)-.3th(5t-42.5),(1.4e^[-(3t-34.5)^2]+1-sgn[|t-8.5|-.5]*1.5*
|sin(pi*t)|^[2e^(-(t-11.5)^2)+.5+e^(-(.6t-3.3)^2)])/(.5+t)+1  ; 0<t<14

Credo di aver capito.
In pratica per vedere il contenuto che mi interessa dovrei far puntare ad
una pagina .pl che crea in output una visualizzazione Html.
A questo punto mi chiedo esiste un'altro modo per visualizzare la
provenienza di un utente senza cambiare la pagina HTML ?
Il dato mi interessava per capire bene come funzionavano alcuni motori di
ricerca.
Grazie per le tue informazioni sei stato gentilissimo.
"Usenet MARco 16450.27702" <N0SP...@i.amRemove.invalid> ha scritto nel
messaggio news:ywmhdx9...@fast.mm.homeunix.org...

Newsgroup: it.comp.lang.perl
Titolo: uno script CGI che funziona solo con opzione -w

Ho uno script in Perl abbastanza semplie di cui non riesco a trovare
l'errore.
Se viene lanciato con l'opzione #!/usr/bin/perl -w oppure #!/usr/bin/perl -d
funziona correttamente altrimenti appae la scritta
500 error system
Il file di LOG produce il seguente risultato
[Tue Jun  5 22:05:06 2001] [error] (2)No such file or directory: exec of
/home/www/cgi-bin/nome_cgi.cgi failed
[Tue Jun  5 22:05:06 2001] [error] [client 127.0.0.1] Premature end of
script headers: /home/www/cgi-bin/nome_cgi.cgi
Se viene eseguito il debug invece il file di LOG inizia con:
Default die handler restored.
Loading DB routines from 
perl5db.pl
 version 1.07
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(/home/www/cgi-bin/forum.cgi:25):
......
Mi sapete dire qualcosa?
P.S.
Se eseguo lo script sul server remoto,  tipo netfirms o f2s, funziona
correttamente,
se lo eseguo in locale sul mio sistema linux Red Had 7, produce gli errori
indicati

 ha scritto nel messaggio
news:9fjfhf$thn$1...@nreadA.inwind.it...


 ha scritto nel messaggio
news:9gqk9e$jh0$1...@taliesin.netcom.net.uk...


Newsgroup: it.comp.lang.perl
Titolo: Perl e Mac OS

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

 Bene.
  Come dire: anche il MacOS ha una shell a riga di comando. :))
	Alla prossima,
		Marco

Newsgroup: it.comp.lang.perl
Titolo: Perchè non gira ?

Premettendo che sono un profano totale di questo bellissimo linguaggio, vi
sottopongo il mio problema:
-rwx------   1 root     root        10724 Mar 22 18:26 dns_up
[root@bigbro dhcp_dns]# ./
dns_update.pl
Can't locate Net/DNS.pm in @INC (@INC contains: /usr/lib/perl
005/i386-linux /usr/lib/perl5/site_perl/5.005 .) at ./dns_upd
BEGIN failed--compilation aborted at ./
dns_update.pl
 line 58.
[root@bigbro dhcp_dns]#
Cosa vuol dire ?
Mi mancano delle librerie credo...
AIUTO

NEXUZ& wrote:

Ti manca il modulo Net::DNS che puoi trovare su uno dei siti CPAN. Se non hai
riferimenti per nessuno di questi siti partendo da 
www.perl.com
 o
www.perl.org
 troverai quello che cerchi.
Newsgroup: it.comp.lang.perl
Titolo: URGENTISSIMO fermare un processo

devo fermare uno script in loop (per errore) come posso fere?.. mi va bene
anche fermarli tutti!
Grazie!!
Oxy
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.465 / Virus Database: 263 - Release Date: 26/03/2003

 anche fermarli tutti!
$ ps
   PID TTY      S           TIME CMD
  6345 ttyp1    I        0:00.43 -tcsh (tcsh)
  6386 ttyp1    R  +    43:29.48 perl 
myscript.pl
  3691 ttyp2    S        0:00.26 -tcsh (tcsh)
$ kill -9 6386
 Raffaello
P.S.: man kill


Forse non mi sono spiegato oppure non ho capito una mazza...
dovevo fermarlo con uno script perl.
Non conosco Unix ma ho l'impressione che quello postato sia un comando unix?
Potrei usarlo forse con un  system() ?...
Ma ho trovato questo script, per quanto date le mie scarse conoscenze non mi
sia chiaro, pare abbia funzionato!!!
Grazie
//////////////////////////////////////////////////
use strict;
use Config;
my $pid = fork;
my $our_pgrp;
$our_pgrp = getpgrp;
defined ($pid) or die "couldn't fork: ($!)" ;
if ($pid) {
   print " Child pid is ($pid).  Now in parent ($our_pgrp) is pgrp\n";
   sleep 10;
   print " Stopping child from parent  ($pid)\n";
   kill 'STOP', $pid or die "($!) returned from stop pid";
   sleep 10;
   print " Restarting child from parent  ($pid)\n";
   kill 'CONT', $pid or die "($!) returned from cont pid";
   sleep 10;
   print " Killing child from parent  ($pid)\n";
   kill 'KILL', $pid or die "($!) returned from kill pid";
   # or system("kill -9 $pid") or die " ($!) returned from kill pid";
   print " tried to kill\n";
} else {
   # In child.
   sleep 5;
   print " Exec'ing in child ($our_pgrp) is pgrp\n";
   exec("time_waster");
}
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.465 / Virus Database: 263 - Release Date: 25/03/2003
Newsgroup: it.comp.lang.perl
Titolo: Come eseguire CGI sotto win95

Ciao ho scaricato il Perl per Win95 ed ho creato una semplicissima
CGI che legge una parola dalla form  e deve scrivarle su una
nuova pagina web.
Quando premo il tasto di submit pero' non accade nulla.
Quello che mi domando e': oltre al browser (netscape comunicator)
ed al compilatore perl ho bisogno di qualche cosa d'altro come
ad esempio un server web installato sulla mia macchina??
Grazie
		    Pierre
--
                         ^
                       ^^^^^ 
                       (o o)
___________________oOO__(_)__OOo________________________________________
 
  Nasini Daniele                WebMaster al DSI Via Comelico 39 Milano
  Milano (Italy)                E-Mail: 
w...@dsi.unimi.it
  [Suzuki DR650 Djebel]                 
pie...@psycho.usr.dsi.unimi.it
 
           -=> 
http://psycho.usr.dsi.unimi.it/~pierre
 <=-

 wrote:
: Quello che mi domando e': oltre al browser (netscape comunicator)
: ed al compilatore perl ho bisogno di qualche cosa d'altro come
: ad esempio un server web installato sulla mia macchina??
Esatto: e` il server che chiama il programma CGI.
-- 
Nando Santagata: Telemastica & infornatica
Key fingerprint = C2 D9 C0 8E D5 B7 04 97  AF E8 3F 3E AF 4E 7F 9E

 		    Pierre
Infatti. devi lanciare un webserver (io prima di passare a Linux usavo
Alibaba, lo trovi sui mirror di tucows).
bye.				franco patamia.
 

Infatti. devi lanciare un webserver (io prima di passare a Linux usavo


 
Esattamente Daniele, 
ti consiglio di provare sambar (anche se e' in versione beta) oppure 
il website di oreally & company....
trovi tutto sotto tucows: 
www.tucows.com
 e da li' scegli uno dei link 
in europa
se ti serve altro fammi sapere
 
				Ciao
					Davide

 
oly...@rimuovimi.spm.it
Scusa, vorrei sapere una cosa primi di scaricare SAMBAR. Attualmente Tucows
dice che ha il perl 5. Quale e' la versione realmente in dotazione? Qual'e'
l'ultima versione di PERL per WIN95 e da dove posso scaricarla?
Ciao e grazie
--
Remo
Ho deciso di piacere soltanto a chi mi rassomiglia (Chamfort)
http://www.aspide.it/freeweb/petritoli/
Newsgroup: it.comp.lang.perl
Titolo: perl 5.6 su FreeBSD4.4

Salve all! :)
Credo di aver fatto un po` di macello sul laptop con FreeBSD4.4.
Dalla console 'perl -MCPAN  -eshell', ho eseguito 'install Bundle::CPAN'
che ha provveduto ad installarmi la versione 5.6.1 di perl.
Credevo di aver sovrascritto la vecchia versione, fino a che non mi sono
accorto di avere  *SIA* perl5.005_03 installato di  default in /usr/bin/
*SIA* perlv5.6.1 in /usr/local.
Ho sbagliato qualcosa nell'installazione? 
	grazie =)
-- 
GHERdO, happy GNU/linux user.
"E sempre allegri bisogna stare...
	... che il nostro piangere fa male al RE!"

 Ho sbagliato qualcosa nell'installazione? 
Non proprio, il problema e' che il prefix di default quando compili
perl dai sorgenti e' /usr/local mentre il package installato su
freebsd ha come prefix /usr, capita... :)
Se non hai installato moduli particolari nella versione vecchia puoi
semplicemente fare un link simbolico da /usr/bin/perl a
/usr/local/bin/perl
Federico Feroldi
Yahoo.it! Tech

 /usr/local/bin/perl
Si`, avevo  pensato di linkare cosi`  tutti gli eseguibili... ma  non mi
piace granche`... e poi per le pagine man ad esempio?
Il top sarebbe rimuovere tutto il vecchio perl... 
Oppure rimuovere il nuovo perl e reinstallarlo in /usr? 8-)


Newsgroup: it.comp.lang.perl
Titolo: come inserire un elemento alla fine dell'array

Come inserisco un elemento alla fine dell'array ?
Con la funzione unshift lo inserisco all'inizio ...
Grazie e scusate se la domanda è banale

 ha scritto nel messaggio
news:8vg456$o5d$1...@pinco.nettuno.it...


 ha scritto nel messaggio
Ancora un'altra variante sbagliata di quote, il quote senza quote... Non
bastavano "R:", quote integrale in coda etc :(
Se continua cosi` su usenet filtrero` tutti quelli che usano OE.
--
Oramai che i baci tuoi piu` non mi sazian
cerchero` un'altra donna dentro ai sogni di Tarzan...

Newsgroup: it.comp.lang.perl
Titolo: url escape

Salve,
     dovrei fare l'url escape ovvero tradurre trasformare gli spazi in 
%20 e cosě via...perň vorrei utilizzare una RE invece del modulo 
URI::escape che ho sentito che č lentissimo...
qualche aiuto?
grazie

 grazie
$url =
'
http://www.newsland.it/nr/post.php?type=reply&id=9752&group=it.comp.lang.perl
';
$url =~ s/[\W\A]/'%' . (sprintf '%x', $1)/goe;
print $url , "\n";
Ciao.
Roberto.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.perl
Titolo: Libro su Perl

Ciao a tutti,
a proposito do Perl .......quale libro per iniziare ? ne ho visti parecchi
ma vorrei dei suggerimenti.
grazie mille
stefano

 ma vorrei dei suggerimenti.
Il Camel book (Programming Perl 3rd) č + un ottimo reference che un 
libro per iniziare (il suo inglese č poi un po' ostico, IMHO).
Un libro davvero completo č:
Professional Perl Programming 
Peter Wainwright et al.
Wrox
la cui recensione la puoi trovare su 
http://www.perl-it.org
e che puoi acquistare su http:/
www.gorilla.it
Se invece vuoi iniziare con una trattazione davvero per 
principiante, anche dal punto di vista della programmazione,
ci sono:
Beginning Perl (wrox)
Elements of Programming with Perl (Manning)
Ma io consiglio vivamente Professional Perl Programming.
-- 
$_=q,6;-16;-1;-8;0;7;-13;-12;-9;-3;13#4A75737420616E6F74686572,,($_,$b)=
split?#?;@b=split?;?;map{$c.=$_,$d.=chr$b[$e++]+ord}split??,pack'H24',$b
;chop$d,print$c.chr(32).$d

 ma vorrei dei suggerimenti.
Come ho suggerito altre volte su questo ng ci sono due libri:
"Perl e Internet"  della McGraw-Hill, scritto in italiano da italiani
(295 pagine) molto semplice e professionale.
"Programming Perl 3rd Edition" della O'Really, è la Bibbia del Perl
(1070 pagine). E' in inglese ma chiaro e veramente completo.
Marco Gazerro

(295 pagine) molto semplice e professionale.
Quest'ultimo lo trovi completamente online al seguente indirizzo:
http://www.hyperbook.it/
    ciao ;-)
--
Italian DivX & Covers Database
http://divx.home.dk3.com/

grazie mille a tutti :-))
stefano

Newsgroup: it.comp.lang.perl
Titolo: Perl e IIS

Scusate la domanda forse banale ma ho sempre usato Perl sotto Linux (Apache)
e purtroppo mi trovo nella necessità per un sito di usarlo sotto Windows
(IIS).
Ho trovato come eseguire i .cgi ma non riesco a far funzionare la classica
istruzione "print $cgi->redirect("pagina.html")"
IIS mi sputa fuori una pagina con:
---
Errore CGI
L'applicazione CGI specificata non ha restituito un insieme completo di
intestazioni HTTP.
---
Qualche idea?

 $cgi->redirect("pagina.html")"
Come non detto, non è l'istruzione e non funzionare, ma qualcos'altro nello
script (chissà ora dove sarà l'errore ^_^).
Newsgroup: it.comp.lang.perl
Titolo: inserimento??

Sono poco più  che neofita abbiate pietà... :)
come faccio ad inserire dei dati in un punto arbitrario di un file??
grazie 2000
gabriele

 cerchero` un'altra donna dentro ai sogni di Tarzan...
(PGP public key: 
http://www.crossbow.it/download/PGPpublickey.asc
)

 Non puoi.
.

Newsgroup: it.comp.lang.perl
Titolo: aprire un file in modalità "aggiuntiva"...

Sto creando un piccolo script ma avrei bisogno del vostro
aiuto :
come faccio a dire al cgi di aprire un file non in modalita
scrittura cioč cancella il contenuto del file e ci scrive
il testo scelto da noi,ma per esempio un file html il quale
deve essere modificato solo in 3 punti ma non so come fare
ad aprire un file solo per fare una modifica :
open (FILE, ">>$file);
e poi???
Grazie
* Sent from AltaVista 
http://www.altavista.com
 Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping.  Smart is Beautiful

open (FILE, ">>$file);
open(FILE,"+>Filename") Opens for both reading and writing
open(FILE,">>Filename")  Appends to
Ricorda che hai bisogno di un "file di appoggio".
Ciao
Alessandro

non ho capito bene,io faccio
open (FILE,"+filename") e poi???
Grazie mi puoi guidare passso passo??
Grazie ancora


Grazie ancora
qualcosa del tipo:
//Apri i 2 files: quello di input e quello di output
open (INPUT,"$input");
open (OUTUT,">$output");
while (<INPUT>)
//percorri tutto il file
{
	// fai quello che vedi fare
	.
	.
	//butti in OUTPUT la riga corrente (manipolata o meno)
	print OUTPUT $_;
}
//Chiudi i files
close (INPUT);
close(OUTPUT);
Ciao
Alessandro

 Alessandro
* Sent from AltaVista 
http://www.altavista.com
 Where you can also find related Web Pages, Images, Audios, Videos, News, and Shopping.  Smart is Beautiful

output e quale di input???
Nella mia esperienza (e bada bene che posso sbagliarmi),
se devi modificare un file (NON fare l'append) devi copiare il
contenuto del file di input in uno di output; altrimenti viene un
casino bestiale!!
Devi quindi aprire il file che contiene cio' che vuoi "trattare" in
modalita' di lettura,APRIRNE UN ALTRO con un nome a tuo
piacere,qundi:
riga per riga (While<INPUT>)
devi copiarlo nel nuovo file (print OUTPUT dato)
alla fine avrai due file  INPUT (originale) e OUTPUT (quello
modificato); a questo punto sta a te decidere se fare un
semplice 'cp OUTPUT INPUT' oppure presentare all'utente direttamente 
il nuovo file (magari vuoi conservare l'history della cosa).
Spero di essere stato chiaro,altrimenti chiedi pure senza esitazione.
Ciao
Alessandro
Newsgroup: it.comp.lang.perl
Titolo: Eseguire CGI in Win95 con PWS

This is a multi-part message in MIME format.
------=_NextPart_000_0006_01BD004D.1537C460
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Come =E8 possibile eseguire gli script in Perl (CGI) in emulazione di =
server PWS come se fosse direttamente nel server Web ?
( ovviamente mediante il tag <form method.......)=20
In pratica vorrei far funzionare un sito completo in Intranet, ma pur =
avendo Perl per Win95 e PWS non funziona......
Grazie !
------=_NextPart_000_0006_01BD004D.1537C460
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>
<META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.71.1712.3"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT color=3D#000000 face=3DArial size=3D2>Come &egrave; possibile =
eseguire gli=20
script in Perl (CGI) in emulazione di server PWS come se fosse =
direttamente nel=20
server Web ?</FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2>( ovviamente mediante =
il tag &lt;form=20
method.......) </FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2>In pratica vorrei far =
funzionare un=20
sito completo in Intranet, ma pur avendo Perl per Win95 e PWS non=20
funziona......</FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT face=3DArial size=3D2>Grazie !</FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial =
size=3D2></FONT>&nbsp;</DIV></BODY></HTML>
------=_NextPart_000_0006_01BD004D.1537C460--
--
Automatic posted from root@[195.120.143.135]
via Mailgate Server - 
http://www.mailgate.org

 wrote:
: This is a multi-part message in MIME format.
: ------=_NextPart_000_0006_01BD004D.1537C460
: Content-Type: text/plain;
: 	charset="iso-8859-1"
: Content-Transfer-Encoding: quoted-printable
*Gasp!*
Ma cosa vomita il tuo news reader?!
: Come = E8 possibile eseguire gli script in Perl (CGI) in emulazione di = 
: server PWS come se fosse direttamente nel server Web ?
: ( ovviamente mediante il tag <form method.......)= 20
: In pratica vorrei far funzionare un sito completo in Intranet, ma pur = 
: avendo Perl per Win95 e PWS non funziona......
Ci spieghi cosa e` il PWS?
[segue di nuovo la stessa drammatica sequenza di robaccia, per di piu`
incapsulata in HTML!!!]
-- 
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: Sul funzionamento dei riferimenti a variabili

Osservando il seguente esempio:
$value = 10;
$ref = "value";
print $$ref;
c'è un particolare che mi stona: Il valore di $ref viene assegnato
come stringa. Come fa l'interprete a capire che "value" è un
riferimento alla variabile $value?
-- 
                     Dona i tuoi cicli di clock alla ricerca!
 
http://boinc.berkeley.edu/
                          --------------------
Legge di Dunne:
	Il territorio alle spalle della retorica e' spesso minato di equivoci.

 riferimento alla variabile $value?
Perché quando l'interprete incontra il costrutto $$ref (ovvero uno 
scalare con uno o più altri sigilli davanti), capisce che stai tentando 
di dereferenziare una variabile (il trucco è tutto qui).
Avendo capito che stai dereferenziando, controlla che $ref sia un (hard) 
reference.
Nel caso lo sia, tutto funziona più o meno come in altri linguaggi più 
/tradizionali/.
Se invece non lo è, come nel tuo caso, perl non si arrende e prova ad 
utilizzare il *valore* della variabile $ref come *nome* della variabile 
alla quale vuoi accedere, nel tuo caso "value" che, con il sigillo che 
hai adoperato per dereferenziare, diventa $value.
I reference di questo secondo tipo si chiamano /symbolic/ (o soft) 
reference:
http://perldoc.perl.org/perlref.html#Symbolic-references
ed il loro uso, che andrebbe _evitato_ il più possibile, viene impedito da:
use strict 'refs';
(o dal più stringente use strict, da usare _sempre_, eventualmente 
disattivandolo nello scope più ristretto possibile, quando è proprio 
necessario);
In conclusione un esempio sulla potenza di Perl: puoi perfino creare 
catene di reference soft e hard intercalati tra loro, e tutto funziona 
come ci si aspetta:
$v     = 'Pippo!'; # valore
$r     = 'v';      # soft ref
$r_r   = \$r;      # hard ref
$r_r_r = 'r_r';    # di nuovo soft ref
print $$$$r_r_r;   # Pippo!
(Ma è puramente didattico, non da usare! ;-)
Ciao
-Emanuele

Newsgroup: it.comp.lang.perl
Titolo: Un semplice forum...

secondo voi puņ competere un semplice forum (molto rustico) in perl con 
quelli che si trovano adesso in rete?
PS=il mio non usa database......
http://www.kryno2001.f2s.com/cgi-bin/generale.pl

 quelli che si trovano adesso in rete?
Molti di quelli che si trovano in rete, tipo PhpBB, hanno una serie 
infinita di feature e quindi bisogna dedicare molto tempo per creare e 
mantenere un software come quello. Il tuo tuttavia non e` male, e credo 
l'importante sia che vada bene a te ed ai tuoi utenti. ;)
A presto, Michele.

 PS=il mio non usa database......
Sono curioso: cosa usi al posto di un database?
ciao
Stefano
Newsgroup: it.comp.lang.perl
Titolo: [OT] suidperl

ciao a tutti
perdonatemi l'ot, ma sto impazzendo.
ho installato su una slack 9 qmail-scanner
che non funziona a dovere: sembra che richieda suidperl
(/usr/bin/suidperl), che non riesco a trovare se non in rpm.
ho cercato anche in cpan, senza risultati (evidentemente
non e' il posto adatto...)
non conosco affatto perl... se qualche buon'anima
potrebbe dirmi dove recupere tale software (i sorgenti o i binari)
gliene sarei molto grato
tia
Rob



Per trasormare in pacchetto in tgz:
	%> rpm2tgz xyz.rpm
poi:
	%> installpkg xyz.tgz
per installarlo :-)
by
	- Enrico
--- have fun with 
www.perl.it
 ---

Newsgroup: it.comp.lang.perl
Titolo: Estrarre una parte di stringa

Purtroppo alle seconde armi
mi è capitato di non riuscire ad estrarre una porzione si stringa.
se :
$stringa = "papaveri e papere pippo e pizza";
e io debba estrarre sempre dal decimo al quindicesimo carattere
e quindi come da esempio dovrei ricavare  "e pape" ,
scusate l'ignoranza......ma qualche esperto....spenda 2 secondi.....grazie.





Perche' mai un esperto dovrebbe spendere 2 secondi perche' tu non hai voglia
di spenderne 10 per consultare il manuale ed imparare qualcosa?
substr()
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)


.....e certo....grazie x l'incoraggiamento.....ne ho 2 di manuali....ma
forse troppo avanzati per trovare una cosa così semplice.
Io ho fatto l'esempio di una stringa.....ma a me serve ricavarla da una
variabile di un Array..ad es:
print "<TD>$fields[0]</TD>";
....ecco.... se tra le quadre è già definito quale record ricavare ........
substr()......dove lo piazzo ?
grazie....
...mi chiamo Maurizio anche io

 substr()
Trovato....Grazie....sei stato utile cmq.
definisco:
$title = substr($fields[0],40,30);
per poi
print "<TD VALIGN=TOP><FONT SIZE=-1><FONT color=#000000>$title</TD>";
Dammi il titolo di un manuale dove....spiega espressamente la
sintassi....con esempi su tutti i comandi
Ad Es. Programmare in per della JL ....è troppo avanzato
e Perl 5 di Tecniche Nuove ..... regala script già fatti....e secondo me
spiega una millesima parte di tutto.

 sintassi....con esempi su tutti i comandi
Non hai bisogno di un libro. Ti basta l'help on-line fornito con Perl.
Al limite ti server Programmare in Perl di Christiansen, Wall e Schwartz.


 da esempio dovrei ricavare  "e pape" ,
	perldoc -f substr
	Alla prossima,
		Marco

 Al limite ti server Programmare in Perl ....
                    ^
Dimmi che errori fai e ti diro` chi sei ;)
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/
Newsgroup: it.comp.lang.perl
Titolo: --Copia di un file -2

Forse ho capito...
il problema non è che il perl non esegue il comando 
rename pippo pippo.new (a parte le virgole ecc..), ma che siccome lo
script viene richiamato da una pagina web non esegue l'operazione di
copia che invece effettua se chiamo lo script da riga di comando.
Cosa posso fare? devo fare qualche settagigo per abilitare lo script a
riscrivere il file?
			Antonello mailto:
a.al...@sistemi.it

Salve.

Devi controllare i permessi del file e, se hai bisogno anche di creare
il file, i permessi della directory. Infatti se lanci lo script dalla
shell, l'owner del processo sei tu, se invece viene lanciato dal web,
l'owner è il web server.
HTH, julio di egidio
ju...@webzone.it
[posted and mailed]

No, è necessario che l'utente che esegue il prgramma cgi sul server abbia il
permesso di scrittura su quel file e la directory in cui è posto. Se vuoi
che lo script sia eseguibile da tutti gli utenti questo deve essere di
proprietà di nobody e il permesso di scrittura sul file deve essere esteso a
tutti gli utenti.
Ciao
Andrea
------------------------------------------------------------------------
Redattore di Ludus (
http://www.ludus.it
)
Recensioni, Trucchi, Soluzioni,
Patch e News per PC e PSX
------------------------------------------------------------------------

 wrote:
: Forse ho capito...
: il problema non è che il perl non esegue il comando 
: rename pippo pippo.new (a parte le virgole ecc..), ma che siccome lo
: script viene richiamato da una pagina web non esegue l'operazione di
: copia che invece effettua se chiamo lo script da riga di comando.
Chi lo esegue allora non e` il tuo utente, ma nobody o www-data, a
seconda dell'installazione di apache (usi apache, vero?), che non e`
detto che abbia i privilegi per toccare i files che vuoi.
: Cosa posso fare? devo fare qualche settagigo per abilitare lo script a
: riscrivere il file?
Puoi dare i permessi giusti alla directory e ai files che vai a
modificare o usareil suidperl, entrambe le cose rappresentano un
pericolo per un verso o per un altro.
Mi sembra che le ultime versioni di Apache permettano di specificare
l'utente con cui vengano eseguiti i CGI presenti in una certa
directory. Guarda nella documentazione.
-- 
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: perfetto principiante

Come da Tutorial CGI ho provato a scrivere un semplice script in Perl
con dei comandi che dovrebbero mostrarmi una semplice pagina HTML. Il
file, chiamato 
hello.pl
 é depositato su un server nella cgi-bin.
Ho poi puntato a questo file con un collegamento ipertestuale da una
pagina del sito. Non funziona.
Cosa posso aver sbagliato ?
Grazie in anticipo.

 pagina del sito. Non funziona.
Come diagnosi e` un po' vaga. Descrivici meglio i tuoi problemi, cosi` 
troviamo una soluzione insieme.
-- 
Baci,
Mony

 Grazie in anticipo.
prova a leggere il seguente link e poi facci sapere:
http://space.tin.it/computer/gciabu/perl/script-cgi.htm

...

Al sito 
www.stdef.ch/prove/prova1.html
 ho 2 link che puntano a script perl.
Uno con il seguente codice:
#!/usr/bin/perl
# 
hello.pl
print "Content-type:text/html\n\n"; 
print "Hello, World...\n";
print "<html><head><title>Prima paginadiprova</title></head>\n"; 
print"<body>\n"; 
print "<h2>Ciao atutti!</h2>\n"; 
print"</body></html>\n";
exit (0);
ma non funziona!

 print "Content-type:text/html\n\n";
prova con 
print "Content-Type: text/html\n\n";
se noti, ci sono delle differenze.
Se non funzionasse ancora, prova a leggere:
http://space.tin.it/computer/gciabu/perl/script-cgi.htm

...

Grazie per i consigli:
- ho trasferito il file in fromato ASCII (questo era l'errore!!
- ho assegnato i permessi
- ho controllato dalla shell
Grazie ancora

Newsgroup: it.comp.lang.perl
Titolo: REQ: contatore + statistiche

Salve,
non so se su uesto canale e' OT ma avrei bisogno di un contatore che
fa anche le statistiche ma che non scrive niente sul video. In pratica
dovrebbe contare quante volte viene visitata la pagina e da quali ip,
a quale ora, ecc.... tutto questo in modo trasparente, cioe' senza
apparire come sul sito come una immagine. 
Spero di essermi spiegato bene.
Grazie sin d'ora per l'aiuto.

...


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

Vorrei sapere come posso gestire con il modulo SMTP (o eventualmente un
altro modulo) gli attachment.
Please Help Me!!!!

 altro modulo) gli attachment.
BASTAAAAAAAAAAAAAAA!!!!!!!!!!!!!!!!!! :-))
use MIME::Lite
Qualcuno lo mette nelle FAQ, sempre che esistano le faq!
-- 
echo f 0:0 ffff 0 | debug
La leggerezza del VOLER essere ....

Qualcuno lo mette nelle FAQ, sempre che esistano le faq!
Il rpoblema e` che e` gia` nelle FAQ... ;)
	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!

 Il rpoblema e` che e` gia` nelle FAQ... ;)
Allora il problema è che nessuno legge le FAQ :-((
Personalmente, per i prossimi messaggi di questo tipo, rimanderò alle
FAQ, vediamo se serve a qualcosa: vi sembra una cosa sensata?

Newsgroup: it.comp.lang.perl
Titolo: Parse Question

Hi
I am quite new to perl and have become stuck. I am trying to retrive and
parse a web page, i can get most pages ok but i have a page which i cant
get. Using a browser i think i know why.It is waiting for a yes or no answer
to do i want to download a cookie. How can i say no using code ?
I fetch the page like this
#!/usr/bin/perl
use LWP::Simple;
$html = get ("
http://url
 of page to fetch ");
print $html;
 
An...@webfxdomains.co.uk

 wrote in message
3993...@news.server.worldonline.co.uk...


Newsgroup: it.comp.lang.perl
Titolo: Script ...sostituzione in file htm.

 Dove sbaglio?
non sbagli, ma in c:\96.jpg il \ viene interpretato e quindi la stringa
che fai match-are divente '<img border="0" src="C:96.jpg" width="292">
height="96">' nel caso lunfo e ' src="C:96.jpg"' nel caso corto, quindi
il match fallisce e la sostituzione non viene fatta.
Prova con:
$riga =~s|<img border="0" src="C:\\96.jpg" width="292"
height="96"></td>||;
vedrai che funziona.
-- 
Saluti,
Giancarlo

 html era conveniente e risolveva "conflitti". :-((((
Nelle regexp come separatore potresti usare, in teoria, qualsiasi
metacarattere che non sia già usato dal preprocessore come carattere
speciale per le funzioni di matching (esempi: | \ ? . [ ] * e altri...)
Il pipe pure si puo' usare... ma come vedi non risolve nulla perché il
backslash viene interpretato come se volessi "quotare" un metacarattere.
Io spesso uso il tilde ~
..vabè ma sono solo abitudini...
Cmq un suggerimento al tuo problema: potresti infilare la stringa da
match-are in una variabile e fare cosi':
my $String = quotemeta(q~<img border="0" src="C:\96.jpg" width="292"
height="96"></td>~);
$riga = s/$String//;
Tutti i metacaratteri vengono quotati.
q significa "single quote"... vabè poi vedi tu... :-)
::guido::

s/.xlm/.xls/; 
Fra .xlm, .xls e .html non č che ci abbia capito molto. Segnalo comunque,
nella pur improbabile ipotesi che ti vengano utili (o che vengano utili a
qualcun altro), i moduli Spreadsheet::ParseExcel e Spreadsheet::WriteExcel.
Io ho usato finora quest'ultimo per generare documenti Excel, e mi ci sono
subito affezionato. Il complementare promette d'essere altrettanto
interessante in lettura.
Ciao.

ppm>
Qui ci sarebbe forse da controllare gli indirizzi dei repository. Non sono
però in grado di aiutarti, in questo momento.
Ciao.

ppm> install Spreadsheet-ParseExcel-Sim~
non so se funzioni. Comunque probabilmente hai un'installazione un po'
impasticciata.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: Put file tramite FTP

Vi chiedo aiuto per questo cgi che mi sta facendo perdere troppo tempo.
non riesco proprio a farlo funzionare come dovrebbe. 
Questo è il mio listato: 
********************************
#!/usr/local/bin/perl
use CGI;
use Net::FTP;
require 'setup.cgi';
$q=new CGI;
$file=$q->param('file');
$link=$q->param('link');
$nomefile=$q->param('nomefile');
$nomelink=$q->param('nomelink');
$ftp = Net::FTP->new("$myserver", Debug=>1, Timeout=>200);
$ftp->login ("utente", "password");
#Invio file per immagine piccola formato gif
$ftp->cwd("/httpdocs/IMMAGINI/gif75x56/");
$ftp->binary();
$ftp->put($file);
#Invio file per il link sull'immagine
$ftp->cwd("/httpdocs/IMMAGINI/Jpg/");
$ftp->binary();
$ftp->put($link);
$ftp->quit;
print"Location: main.cgi\n\n";
****************************************
Io dovrei selezionare un file (del tipo c:\documenti\immagini\immagine.gif )
che poi viene spedito tramite il cgi in una cartella sul web server.
Se io lo provo su iis installato localmente sul mio pc sono riuscito a farlo
funzionare ma dal web server in internet mi restituisce sempre questo errore
nel debug:
Net::FTP=GLOB(0x9f3a454)<<< 200 Type set to I.
Cannot open Local file F:\Documenti\Immagini\P3130028.JPG: No such file or
directory
 at /usr/local/plesk/apache/vhosts/
escama.it/cgi-bin/ftp.cgi
 line 25
Net::FTP=GLOB(0x9f3a454)>>> QUIT
Nel debug funziona tutto fino a quando deve trasferire il file da locale verso
il web server. sembra quasi che vado a cercarlo nelle sue cartelle locali
invece che sul mio pc.
Se mi potete illuminare su questo problema ve ne saro' infinitamente grato.
grazie.
-- 
Posted from  [212.171.106.247] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 invece che sul mio pc.
Ti consiglierei di illustrare il tuo problema con maggiore chiarezza.
Detto cosě, sembra che tu ti stupisca di una cosa perfettamente normale:
uno script Perl eseguito su un web sever remoto non riesce ad accedere a
un file del tuo PC.
Se devi scrivere uno script CGI per l'upload dei file, usa il modulo CGI;
la documentazione spiega come fare.
Max

 at /usr/local/plesk/apache/vhosts/
escama.it/cgi-bin/ftp.cgi
 line 25
Ciao,
non sono molte esperto in Perl, pero' potrebbero essere un paio di
cose:
la prima e piu' banale, nel primo caso parli di disco c: nel rapporto
si parla di disco f:
La seconda che non riguarda il Perl e' che probabilmente il web server
gira in un ambiente virtuale, la cosiddetta document root e' da li
solo i CGI che ci girano possono leggere/scrivere i vari files.
Quindi o parlando con il tuo webmaster ti fai aggiungere un percorso
accessibile al utente webserver (parlo cosi' perche' credo che tu usi
NT o 2000, se fossi sotto Linux mi sarei espresso in altri modi:-) )
in modo che il tuo cgi possa leggere il file da inviare.
Se invece si tratta di un problema di Perl, lo sto usando da poco e
non sono ancora in grado di farti un debug al volo del tuo script,
dovrei installarlo provarlo ecc. e il tempo e' quello che e'.
Spero di esserti stato di aiuto.
|----
|Stefano Orsi
|Email: 
s.orsixxxatogcs.com
*** Remove xxx from Email address and switch at with @ ***
Newsgroup: it.comp.lang.perl
Titolo: Perl e Vista

Ciao , 
qualcuno di voi ha provato ad installare perl su Ms Vista ?
Qualche feedback?
Ciao 
Pietro   
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
Vista? Cos'e'?
-- 
genge'


:-)

 ha scritto nel messaggio 
news:rkCch.9242$P04....@tornado.fastwebnet.it...


 Dovrebbe essere il nuovo S.O. windows
Credo fosse ironico :-)

 Dovrebbe essere il nuovo S.O. windows
Si: 
http://snipurl.com/15tvw
"Security flaw found in Microsoft's Vista"
Microsoft's security experts had an uneasy Christmas after a security flaw
was discovered in Windows Vista, the software company's new operating
system - the first since its official release four weeks ago.
The flaw is a symbolic blow to Microsoft, which has spent five and a half
years developing Vista. The software, which was launched two years later
than originally planned, is the biggest upgrade to the operating system
since the release of Windows 95 and Microsoft focused heavily on improving
security.
[...]
:)
 Raffaello

Newsgroup: it.comp.lang.perl
Titolo: Una domanda seria..

$stringa =~ s/^\s*(.*?)\s*$/$1/;
Questa l'ho trovata su "La FAQ list di it.comp.lang.perl"
Vuol dire, se ho capito bene che
s/            sostituisce
^\s*        un numero > 0 di spazi all'inizio di $stringa
(.*?)        una serie di scritte
\s*$        un numero > 0 di spazi alla fine di $stringa
$1            con? Sicuramente con il risultato di (.*?) ma: se (.*?) la
consideriamo una parte di una re, $0 sarebbe stato ^\s* ??
Grazie!!!!
--
Maximiliano Bonfiglio
mailto:
mbon...@flextel.it
FLEXTEL S.p.A.
http://www.flextel.it
Corso Vercelli 328
IVREA 10015 TO Italy
tel 39-125-235319
fax 39-125-252067

 consideriamo una parte di una re, $0 sarebbe stato ^\s* ??
                                     ^   ^
il contenuto prima e dopo il match lo trovi in altre variabili (
p.es
. $` e $')
comunque $0 viene usato in altro contesto (=nome del programma che viene
eseguito)

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

Salve mi chiamo Gianluca e sono nuovo di questo news, e nuovo nell'approccio
del Perl, tanto neofila che non so neppure dove trovare un kit di sviluppo
per windows. Poreste indicarmi dove scaricare il software per iniziare a
fare pratica, grazie 1000 Giallu

!

http://www.activestate.com
e... benvenuto! ;)
	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!