mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: Dati da db

Qui in azienda ho creato un programmino per stampare le etichette che si
appoggia ad un database dbm, ho da poco aggiunto una sub per scaricare
via ftp l'aggiornamento del file contenente i dati. Il problema e' che
per poter leggere i dati nuovi devo per forza chiudere il programma e
farlo ripartire altrimenti continua a non vedermi i codici inseriti nel
nuovo databse scaricato. C'e' un qualche modo per far si che non sia 
necessario uscire dal programma?
Il tutto gira su una debian linux 2.1 con perl 5.004
-- 
   __   _                  General Failure Error:
  / /  (_)__  __ ____ __   M$ Windows found on this system!
 / /__/ / _ \/ // /\ \ /   Remove it? (Y/y)
/____/_/_//_/\_,_//_\_\                    netamdin@.
MAPS.ON.sedes.net

necessario uscire dal programma?
hai provato a chiudere il DB e riaprirlo?
Oha
-- 
#include <disclaimer.h>

 hai provato a chiudere il DB e riaprirlo?
...o ad usare il metodo sync?
	Alla prossima,
		Marco

 hai provato a chiudere il DB e riaprirlo?
sisi, il db resta aperto solo per una frazione di secondo, il tempo di
rintracciare il record interessato e poi viene richiuso. Mi spiego
meglio:
L'utente digita il codice (un numero di 9 cifre) e la quantita' di
pezzi, a questo punto viene aperto il db, cercato il record, messi i
dati che mi servono in alcune variabili e richiuso il db, tanto per
capirci:
- Viene preso il codice da STDIN
- VIene presa la quantita' da STDIN
- Viene eseguito questo pezzo di codice:
#------
dbmopen (%dati,"dati",0644) || die "Can't dbmopen database: $!\n";
if (! $dati{$codice}) {no_code($codice)}; #questo e' solo un controllo
$riga = $dati{$codice};
($OldCod,$Descrizione,$ArtCli,$UM,$RagSoc) = split (",",$riga);
$quantitaUM = $quantita ." " .$UM;
dbmclose (%dati) || die	"Can't dbmclose	database: $!\n";
#------						
si ok e' ottimizabile :-) ma e' da poco che programmo in perl, ho gia'
visto un paio di migliorie da fare qui, comunque, come vedi il db viene
aperto e chiuso in 1-2 sec. (calcola che sono 1,3Mb di db su un 486).
Inoltre la procedura che scarica via ftp il db lo fa quando il db non e'
aperto:
#-----
use Net::FTP;
$ftpserver = "
ftp.oldsedes.net
";
$ftpdir = "/pub";
$ftp = Net::FTP->new("$ftpserver");
$ftp->login("anonymous","
etichette.pl
\@
etichette1.oldsedes.net
");
$ftp->cwd($ftpdir);
$ftp->get("dati.db");
$ftp->quit;
#------


 ...o ad usare il metodo sync?
Scusa l'ignoranza, cosa sarebbe il metodo sync? Intendi il comando di sistema
sync oppure e' una qualche funzione del perl di cui ignoro l'esistenza?
(non uccidetemi, non e' molto tempo che programmo in perl)


 ignoro l'esistenza?
<code>
	$X = tie %hash, 'DB_File', $filename, $flags, $mode, $DB_HASH;
	$hash{$key} = $value;
	$X->sync;	# Flushes any cached buffers to disk
</code>
 
	Alla prossima,
		Marco


Ok, grazie, mi metto subito a studiarci sopra.


 	
Ok, funge tutto, grazie :-)

Newsgroup: it.comp.lang.perl
Titolo: Form+Perl come interagire?

Come faccio ad agganciare un campo di un form, poniamo NOME, con la
variabile $ENV in Perl che devo introdurre da tastiera? Ad esempio:
Nome: ................ (digito il nome)
lo script mi deve elaborare questa stringa, ma come faccio ad agganciare
alla $nome il campo del form NOME? Ed il comando che genera un link come si
chiama? Non si riesce a trovare una lista di comandi Perl in rete?
Scusate se vi chiedo troppo ma in nessun manuale in rete riesco a trovare un
esempio di come si puň fare ciň, un grazie a tutti fin d'ora.
Riccardo

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

 esempio di come si puň fare ciň, un grazie a tutti fin d'ora.
 Il problema e' che non hai le idee chiare su cosa vuoi fare, perche' di
 esempi del genere CGI.pm e' pieno.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Newsgroup: it.comp.lang.perl
Titolo: read(FILEH) da ActivePerl su Win2000





Perchè non riesco a leggere un file binario


completo da ActivePerl su Win2000+IIS, mentre


con lo stesso codice su Linux+Apache lo fa' ?!??!?


 


Grazie.


 
----------------------------------------------------- 
Marco 
Disco 
marco...@dbcaditaly.com
 
http://www.dbcaditaly.com





 con lo stesso codice su Linux+Apache lo fa' ?!??!?
 perldoc -f binmode
 
http://www.perldoc.com/perl5.6/pod/func/binmode.html
Max

 > Perchč non riesco a leggere un file binario

Newsgroup: it.comp.lang.perl
Titolo: connessione a postgres da windows

Ciao a tutti,
ho una server linux con postgres. Ho installato i binari del perl 5.3 sotto
windows98. Vorrei sapere se è possibile accedere da uno script
perl sotto windows al database remoto.
Ovviamente non credo che basti riferire il modulo Pg.pm.
Chi mi da una mano?
TIA,
        Manrico
--
Posted from 
ns.omnitel.it
 [194.20.65.11] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ovviamente non credo che basti riferire il modulo Pg.pm.
qui sei stato piu' preciso, non serve distinguere i due casi, quindi vado
con la risposta: se hai un win con interprete perl, sotto il quale gira il
tuo script di gestione del database, questo script deve includere dei moduli
di connessione al suddetto database (Pg o DBI, io uso Pg). Entrambi
necessitano che tu definisca il nome del database da interpretare tramite
l'istruzione: Pg::connectdb("dbname=..."). Questo mi semmbra essere il
nocciolo del problema. Io non ho mai specificato un path, ma sempre e solo
il nome, ad es. "prova_db", e credo, ma sono pronto a rimangiarmi quel che
dico, che questa sia l'unica via possibile, quindi, se il database
PostgreSQL risiede in un computer remoto, non penso sia fattibile.
Ma in effetti se ci pensi questo e' ovvio. Infatti lo script perl che tu
scrivi deve essere utilizzato da computer remoti, ma deve girare sotto il
server. Infatti, e' nel server che il demone postmaster cerca il database,
non in altri pc remoti.
E quindi, per la soluzione al tuo problema, torno a distinguere:
1) o il computer che utilizzi come server dove gira lo script e' il win e
allora dovrai stabilire se e' possibile utilizzare PostgreSQL in ambiente
win e spostare nel win il database;
2) o il computer che utilizzi come server e' Linux, e allora dovrai
semplicemente spostare lo script dal win al Linux;
Tutto questo affinche', sia lo script perl, che il database, siano sullo
stesso computer.
ciao,
asast

 stesso computer.
Mica è necessario... lo script può essere su un server e il database
su un altro.
Dal man di DBD::Pg
$dbh =
DBI->connect("dbi:Pg:dbname=$dbname;host=$host;port=$port;options=
$options;tty=$tty","$username", "$password");
--
Valerio Granato - 
val...@grana.to
FOR KeyMaster - i2000 Usenet Hierarchy
Maggiori informazioni sulla gerarchia i2000?
http://www.i2000.usenet.it
 - 
in...@i2000.usenet.it

 Ovviamente non credo che basti riferire il modulo Pg.pm.
Prova con ODBC, nelle FAQ di Postgres trovi i necessari link
ai drv. ODBC per Pg, oppure mi pare che openlink ne faccia di commerciali.
-- 
Ciao, Maurizio.

Avete ragione, e' possibile effettuare la connessione ad un database
archiviato su un computer remoto, ci sono i parametri per farlo ... chiedo
venia.
Riguardo all'utilizzo di moduli perl per database e ODBC, mi dispiace, ma
non so aiutare, in quanto ho sempre utilizzato perl sotto linux.
ciao,
asast
Newsgroup: it.comp.lang.perl
Titolo: Cosa utilizzare per la multipiattaforma?

Sto pensando di realizzare un progetto di motore e-commerce in perl che fa
uso pesante dei database.
Vorrei fosse multipiattaforma (linux/unix-windows),pensavo ad odbc.
Domande:con perl posso accedere a odbc? se si dove trovo doc a proposito?
Sul sito di activestate sembra dicano che odbc viaggia solo sotto
windows...anche se credo ci sia un porting, che alternative ci sono?
Grazie.

> Domande:con perl posso accedere a odbc? se si dove trovo doc a proposito?
Puoi accedere ad ODBC tramite DBI e DBD-ODBC, usando query SQL. Trovi tutte
le info necessarie dei moduli su 
www.perl.com
 e un mini tutorial che spiega
come accedere a un file Access tramite ODBC sotto Win qui:
http://www.wdvl.com/Authoring/Languages/Perl/PerlfortheWeb/index6.html
Sulla portabilità di ODBC ho dei dubbi ... cmq sul sito 
perl.com
 magari
trovi qualcosa anche riguardo a quello.
Bye, Ezio Bonsi
Newsgroup: it.comp.lang.perl
Titolo: Scomporre una riga


Grazie per suggerimenti o link qualnt'altro mi possa aiutare
Ciao Max


$stringa =~ /^(.+)\s(\<.+\>)$/;
  Raffaello



Meglio ancora:
$stringa =~ /^(.+)\s(\<\S+\>)$/;
  Raffaello

> $stringa =~ /^(.+)\s(\<\S+\>)$/;
Grazie mille per l'aiuto
Ciao Max

Newsgroup: it.comp.lang.perl
Titolo: INVIO EMAIL

Come si può mandare una email con un cgi o un perl? (Il testo della email ce
l'ho memorizzato in alcune variabili)
Grazie
Andrea

l'ho memorizzato in alcune variabili)
Dai un'occhiata a:
http://www.borders.it/perl/faq/index.cgi?task=view&id=10015
	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: garfici lineari

ciao
stò cercando un script perl che presi i dati da un file di testo o da un
record mi generi un grafico lineare da inserire in una pagina web.
Qualcuno sa indicarmi cosa usare e dove posso trovarlo.
grazie
matty
--

 Qualcuno sa indicarmi cosa usare e dove posso trovarlo.
 
http://search.cpan.org/author/MVERB/GDGraph-1.39/
Max
Newsgroup: it.comp.lang.perl
Titolo: AIUTO: come usare il perl?

Come posso utilizzare il perl?
cosa č un compilatore...?
dove posso trovarlo per win 95?
Grazie

 dove posso trovarlo per win 95?
 
www.activestate.com
 
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@tuttocitta.it
 
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

  
www.activestate.com
Ti ringrazio!

Newsgroup: it.comp.lang.perl
Titolo: prendere i byte in parole di 2 byte

Salve a tutti.
Ho un problema che non so risolvere. Ho bisogno di codificare una sequenza
numerica in un'altra sequenza numerica. Mi spiego meglio.
Supponiamo di aver acquisito la seguente sequenza: 192 168 123 243 443 109.
Vorrei che questa sequenza venisse codificata in un'altra sequenza anch'essa
numerica.
Ho fatto quanto segue per la codifica
@data = (192,168,123,243,443,109);
push(@data,sum(@data) % 255) # calcolo il checksum
my $cipher = Crypt::CBC->new({key => "password",
                                                    iv => "01234567",
                                                    prepend_iv => 0,
                                                    cipher => "Blowfish"});
my $ciphertext = $cipher->encrypt(pack("C*",@data));
my @cipherpack = unpack("C*",$ciphertext);
Usando le funzioni pack e unpack con "C*" riesco ad ottenere una sequenza
numerica da quella di partenza. Purtroppo però se tra i numeri della
sequenza se ne trova almeno uno maggiore di 255, il calcolo del checksum in
fase di decodifica risulta errato.
In fase di decodifica ho fatto quanto segue:
my $cipherd = Crypt::CBC->new({key => "password",
                                                      iv =>"01234567",
                                                      prepend_iv => 0,
                                                      cipher =>
"Blowfish"});
my $cfrtext_rev = pack("C*",@cipherpack);
my @datad = unpack("C*",$cipherd->decrypt($cfrtext_rev));
print "Checksum ok\n" if (sum(@datad[0..@datad-2])%255)==$datad[-1];
Qualcuno ha qualche suggerimento (oppure un metodo alternativo) su come
posso risolvere questo problema e fare in modo che la sequenza acquisita
possa contenere numeri maggiori di 255?
Mi è stato suggerito di prendere i byte in parole di 2 byte (in pratica
leggerli due alla volta). Qualcuno sa come posso fare questa cosa in perl?
Grazie a tutti

 my $ciphertext = $cipher->encrypt(pack("C*",@data));
da perldoc -f pack leggo:
C   An unsigned char value.
dunque da 0 a 254
Dunque invece che C, prova ad usare pack e unpack con il template I:
I   An unsigned integer value
che dipenderà credo dall'architettura della macchina dunque in tempi 
recenti almeno 32 bit.

 ha scritto nel messaggio
news:boreq1$c6o$1...@news.ngi.it...


 codificato in un altro numero compreso tra 0 e al massimo 65535.
Usa 'pack' con 'S' (che è _esattamente_ di 16 bit).
Max


L'ho usato e funziona. Ringrazio tutti
Alla prossima
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.perl
Titolo: stringhe e filehandle..

Caio a tutti...
in uno script ho una cariabile cos definita:
$var = q{bla bla bla};
Ora avrei la necessità di mettere in $var il contenuto di un file: come
posso fare?
in particolare, se il filehandle l'ho scritto all'interno dello script per
un file di log, posso riutilizzarlo?
oppure devo chiudere il file appena creato e riaprirlo in lettura?
Un possibile utilizzo sarebbe questo:
$msg = MIME::Lite->new(
                 To      =>'
y...@yourhost.com
',
                 Subject =>TEST!',
                 Type    =>'multipart/related'
                 );
    $msg->attach(Type => 'text/html',
                 Data => $var    );
Spero di essere stato chiaro.
molte grazie.
bye ;-)

                 Data => $var    );
Sai, vero, che puoi passare ad MIME::Lite::attach anche il nome del file
(parametro 'Path') o un file handle (parametro 'FH')?
Ciao.


Mea culpa: non avevo letto ancora tutto il manuale di mime-lite...
Cmq grazie per il prezioso aiuto...
bye ;-)

Newsgroup: it.comp.lang.perl
Titolo: Somma degli elementi di un array

Sono 3 ore che lavoro dietro ad uno script, e devo risolvere un
problemino; ho l'array @numeri:
@numeri = (1, 2, 3, 4);
C'è un modo per fare direttamente la somma di tali elementi (che so per
certo essere numeri e non stringhe) senza dover fare qualcosa del tipo:
$somma = $numeri[0] + $numeri[1] + .... ;
visto che non so quanti elementi ha l'array (ok, potrei utilizzare
scalar(@numeri) per trovare il numero di elementi, ma non mi sembra poi
bellissimo!!!) ??
Spero che la risposta non sia troppo scontata: al momento ho la testa
"in bambola" e non mi viene in mente niente! ;-)
Ciao
M.
-- 
:wq

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

Newsgroup: it.comp.lang.perl
Titolo: mod_perl, cosa c'e' in italiano ?

ciao a tutti. come da oggetto, c'e' qualche forum, newsgroup, ml, o doc
in italiano? ho trovato veramente poco in giro.
grazie
Ivan
-- 
No one gets sick on Wednesdays.

 in italiano? ho trovato veramente poco in giro.
Temo che al momento non ci sia troppa documentazione in italiano su
mod_perl. In compenso sono usciti un po' di testi interessanti in inglese.
;)
L'unica tua risorsa penso sia questo newsgroup, o il gruppo di Perl
Mongers piu` vicino a te! Guarda 
http://www.perl.it/
 per vedere in quali
zone d'Italia siamo riusciti a penetrare nella societa`! ;-)
Michele.
Newsgroup: it.comp.lang.perl
Titolo: misterioso foreach che nn foriccia

Scusate ma non reisco a capire dove sia il problema in questo codice:
foreach my $k (keys %modems) {
		my @users = $modems{$k}->{usersGroup}[0]->{userIdentity};
		print Dumper(@users);
	        foreach $l(@users) {
			print Dumper($l);
		}
	}
}
Questo è quello che stampa:
$VAR1 = [
          'pippo',
          'pippo2',
          'pippo3'
        ];
$VAR1 = [
          'pippo',
          'pippo2',
          'pippo3'
        ];
Cioè @users e $l sono uguali!!
Ho provato con:
for $l(0..$#users) {
    print $users[$l]; # stampa ARRAY
}
Utilizzo XML::Simple e il debug del file letto è:
'usersGroup' => [
                                 {
                                                'identity' =>
'sviluppo',
                                                'userIdentity' => [
 
'pippo',
 
'pippo2',
 
'pippo3'
                                                                         ]
                                 }
                        ]
Quindi sembra tutto regolare, allora cosa sbaglio???

   my @users = $modems{$k}->{usersGroup}[0]->{userIdentity};
La seconda parte di questo assegnamento non produce un array ma un reference
a un array. Se assegni uno scalare a un array, ti ritrovi un array con un
unico elemento. Nel caso in questione, @users contiene, dunque, un singolo
elemento, che è -appunto- il suddetto reference ad array.
Il realtà tu volevi scrivere:
 
  my $users = $modems{$k}->{usersGroup}[0]->{userIdentity};
  foreach my $l( @{ $users } ) {
   # etc..
Max

Era quello che supponevo... infatti ho cambiato modulo ed ora utilizzo
XML::Smart che è fantastico!!! non avevo mai trovato una libreria xml
così completa e semplice!!
Tra l'altro l'autore di XML::Smart nella documentazione segnala che
c'è da diventare scemi con XML::Simple se ritorna una array, un hash,
uno scalare oppure un rferimento, ed io purtroppo c'ho perso 2 giorni
per capirlo!
grazie


Newsgroup: it.comp.lang.perl
Titolo: Apri txt

Io dovrei aprire un file txt in una rich text box .
(Adesso riesco ad aprire una riga io invece volevo leggere tutto il testo)
Grazie


Usa la funzione "read"
Ciao
Andrea Busia
No Spam, Grazie.

Newsgroup: it.comp.lang.perl
Titolo: Perl vs shell

Esiste un paper dell' argomento in oggetto ?
Andrea



Ciao,
io inizierei da qui:
http://www.google.com/search?q=perl+vs+shell
by
	- Enrico
Newsgroup: it.comp.lang.perl
Titolo: Come si ordina un array?

Vorrei sapere come fare per ordinare un array
in base a più criteri.
Es. ho una lista di studenti di questo tipo, in cui
Il primo campo è la media-voto e il secondo campo è
il numero di presenze:
8|31|Studente1
6|24|Studente2
6|30|Studente3
con:
@stringa = sort  {$b <=> $a} @stringa;
so ordinare la lista in base al primo campo, cioè al voto.
Ma, a parità di voto, come posso ordinare la lista in base
a chi ha il maggior numero di presenze?
Cioè vorrei che la lista risultasse ordinata nel seguente modo:
8|31|Studente1
6|30|Studente3
6|24|Studente2
Grazie,
Nicola

 con:




  C'e'un problema: quello che fai vedere non e' un array e non lo ordini
  con il comando che hai mostrato.
  Oppure usi una struttura dati che non ci fai vedere.
 
  Supponiamo che tu usi un array di hash, dove hai tre 'key', VOTO,
  PRESENZE e NOME, puoi fare
  @ordinato = sort { $b->{VOTO} <=> $a->{VOTO} ||
                     $b->{PRESENZE} <=> $a->{PRESENZE} ||
		     $a->{NOME} cmp $b->{NOME} } @vettore_ref_hash;
 
  In pratica, metti il secondo criterio di ordinamento in OR logico ||,
  cosi' se il primo restituisce 0 (ovvero falso), viene valutato il secondo.
  Qui io ho messo anche il nome dello stedente come terzo criterio di
  ordinamento.
 
  Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@tuttocitta.it
 
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Newsgroup: it.comp.lang.perl
Titolo: problemi di virgole? .. boh ...

Ciao a tutti! :D
Rieccomi di nuovo e scusatemi il disturbo.
Penso di aver problemi con le virgole (infatti mi da come errore al richiamo
del
cgi "internal server error" ).
Vi riporto di segiuto le righette di codice. Mi dite se son giuste pse?
Se son sbagliate mi scrivete sotto la sintassi corretta? Grasssssssie! :D
Cia' cia'
Francesco
print "<table border="0" width="705" height="291">\n";
print "<tr>\n";
print "<td width="124" height="59" align="center" rowspan="2">\n";
print "<img src="
http://www.ilmiosito.it/immagini/logoazienda.jpg\
"
width="139" height="83">\n";
print "</td>\n";
...
...
...
print "<td width="59" height="36" align="center">\n";
print "<a href="index.htm"><img
src="
http://www.ilmiosito.it/immagini/home.gif\
" width="82" height="22"
border="0"></a></td>\n";
...
...
...

 wrote:
Mi sembra ti abbiano gia' risposto e spiegato com erisolvere il problema.....
Comunque:
print "<table border="0" width="705" height="291">\n";
deve diventare:
print "<table border=\"0\" width=\"705\" height=\"291\">\n";
-- 
Saluti,
Giancarlo

>>><Grazie della tua disponibilita' e scusami se sono un ignorante di perl!

Newsgroup: it.comp.lang.perl
Titolo: script "ponte" (o come mandare la stessa form a due script diversi)

situazione:
ho una form di iscrizione ad un servizio.. la pagina di "uscita" della
procedura è un'altro form di iscrizione ad un altro servizio (diverso
cgi, diversa direcory).. la cosa viene vista come uno step 1 e 2.
Per varie ragioni dovrei unire le pagine in un unica cosa.
problema:
ci sono alcuni field in  comune alle due form e devo fare una "action
doppia".
domanda:
sapeta come mandare una form contemporaneamente a due cgi? o
direttamente dalla pagina o usando un cgi che faccia da ponte? io
proprio non ho idea di come gestirlo...
grazie
The Bos

 doppia".
non puoi creare il secondo form in maniera dinamica e metterci
(dentro campi hidden) i valori che ti servono del primo form?

 (dentro campi hidden) i valori che ti servono del primo form?
il problema non è quello, è che devo mettere una sola pagina che richieda
tutti i dati.. nella "seconda" pagina va inserita un altra form ancora.
The Bos


appunto.
una pagina che richiede tutto (potrebbe essere un cgi che la crea)
->
primo cgi che prende in input i dati e che contemporaneamente CREA il
secondo form che ha anche i dati del primo form in campi hidden
->
secondo cgi (potrebbe essere quello sopra, chiamato con un
flag apposito che gli faccia capire che è al secondo passo)
che processa tutti i dati
insomma potresti risolvere tutto con 1 solo cgi che
a) mostra il primo form
b) processa i dati del primo form e mostra il secondo form
c) processa i dati totali e saluta l'utente
Newsgroup: it.comp.lang.perl
Titolo: Mysql e perl

Eseguendo questo script da shell, quindi perl add.cgi
ottengo il messaggio seguente:
(offline mode: enter name=value pairs on standard input)
#!/usr/bin/perl
### add.cgi
use CGI qw/:standard/;
require "common.sub";
$f_name = &filter(param(f_name));
$l_name = &filter(param(l_name));
$phone  = &filter(param(phone));
printheader;
&Create_DB_Connection;
&write_data;
&print_output;
# Disconnect from the database
$sth->finish; $dbh->disconnect;
sub write_data{
$SQL = "INSERT INTO phones ('$f_name','$l_name','$phone') VALUES
('Bianchi','Luigi','1234')";
&Do_SQL; }
da web:  Internal server error 500
Naturalmente Mysql e' attivo e common.sub e' configurato correttamente
host user password.
Ho creato una tabella phones con 3 campi: f_name,l_name,phone.
Qualcuno puo' darmi qualche suggerimento??

 da web:  Internal server error 500
Sull'internal server error, ne parliamo dopo che hai eseguito il programma
in interattivo. 
Personalmente, non metterei le variabili dell'insert tra ''. Preparerei un
istruzione con dei placeholder e poi la eseguirei con le variabili pure come
parametri. Ci pensa il modulo DBD a sistemare tutto e mettere gli escape
adeguati.  Perche' poi prendi il nome dei campi da form e i valori li tieni
fissi... boh.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Ciao Maurizio,
ti ringrazio tantissimo per le indicazioni ed approfitto allora per chiederti
se mi potresti consigliare un manuale
che tratti questo argomento.
Tu parli del reference che c'e' sul sito 
www.mysql.com
??
Grazie ancora per le tue indicazioni.
PS. I values nell'istruzione SELECT ..... li ho messi visto che da mysql
monitor faccio cosi', lo so che si puo' fare anche
come mi hai suggerito, e provvedero' subito a questa modifica.
Ciao
Corrado

 come mi hai suggerito, e provvedero' subito a questa modifica.
Non e' che fosse obbligatoria... solo un po' strana. Soprattutto se dal form
prendi il nome dei campi mentre il valore e' sempre prefissato nel codice :)

Newsgroup: it.comp.lang.perl
Titolo: perl-it.org ti desidera!

Ciao!
www.perl-it.org
 sta cercando di proporsi come sito ufficiale di questo
newsgroup. Attualmente e` coordinato da 5 o 6 persone, ognuna della
quali (me incluso) ha pochissimo tempo da dedicare all'aggiornamento
di esso. Ci sarebbe molto da fare, se qualcuno vuole collaborare mi
scriva!!!
	Grazie e ciao, Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> FAQ di it.comp.lang.perl: 
http://www.borders.it/perl/faq/
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!

Puo' essere interessante !!!
Per ora l'unica parte un po' fatta sono le FAQ ma il sito sembra promettere
bene.
Credo che piu' avanti quando avro' un po' piu' tempo mi faro' vivo se ancora
avrai bisogno !
Alex
Michele Beltrame ha scritto nel messaggio ...


scriva!!!
Io ho un paio di esami a fine mese. Ma poi mi piacerebbe collaborare.
Ciao
Dark Wave
P.S. Piccola critica: perche' il moduletto sulla homepage per mandare
i commenti non usa un cgi ma il client di posta elettronica?

 ha scritto nel messaggio
news:slrn98qk...@karma.italpro.net...


Io sono a disposizione , tempo permettendo, e se ti posso aiutare 
per quel "poco" che so...


Newsgroup: it.comp.lang.perl
Titolo: @arry='ls -la' non funziona

scrivendo 
#!/usr/bin/perl
@arry='ls -la'
@arry contiene la stringa "ls -la" non mi espande il comando, ho
risolto con glob() ma vorrei capire cosa non va. chi ha suggerimenti
apa...@yahoo.it

 ha scritto nel messaggio
news:3a8955b6...@news.iol.it...


 @arry='ls -la'
dovresti usare il quoting qx//
ciao
charp
~
~
:wq

...? Non mi ricordo.
ALT + 96

Newsgroup: it.comp.lang.perl
Titolo: dove sto sbagliando ? aiuto.

premetto che sto iniziando. dopo tre giorni di prove, ho scritto queste due
righe:
#!/usr/bin/perl
  push(@file, `find /var/sitodelcomune -name "*.htm*"`);
  print "@file\n";
        open (PASSWD,  "  +> @file") || die "Impossibile aprire
passwd.\n\n";
    while ($r = <PASSWD>){
    $r =~ s/Monotype Corsiva/Thaoma/;
  print  "$r\n";
           }
        close (PASSWD);
...... a quanto pare una porcheria, leggo e rileggo, provo, ma non funziona.
come dicevo, sto iniziando.
si ferma alla OPEN , mi dice impossibile aprire il file.
io vorrei cambiare una stringa all'interno di tutti i file html di un sito,
per evitare di editarli uno per uno.
qualche consiglio ?
grazie
carlo

 qualche consiglio ?
 find /var/sitodelcomune  \
   -name '*.htm*'         \
   -exec perl -i.bak -pe 's/Monotype Corsiva/Thaoma/g' {} \;
MM
Newsgroup: it.comp.lang.perl
Titolo: ActivePerl

Ciao,
ho installato ActivePerl per programmare su windows, ma... Credo d'aver 
bisogno di un editor. Non c'è qualcosa di simile a KWrite per windows?
Grazie,
il p.

il Pigro > wrote:

http://perldoc.perl.org/perlfaq3.html#Is-there-an-IDE-or-Windows-Perl-Editor%3f

il Pigro > ha scritto:

Prova Scite

Restando sul freeware ti segnalo PSPad...
http://www.pspad.com/it/
...ho un collega che lo osanna tanto! :-)
Daniele
Newsgroup: it.comp.lang.perl
Titolo: chmod da script

Ciao a tutti,
Se ho una situaziune come questa:
cartella                    owner                    group
prova                        prova                    minanet
lanciano uno script perl che modifichi i diritti alla cartella e lo script č
save.pl
                    minanet                minanet
come mai non mi cambia i diritti alla cartella?
Grazie e spero di essere stato chiaro
Nicola.

 wrote in message
91o48f$9n...@news.edisons.net...

Newsgroup: it.comp.lang.perl
Titolo: Spacchettamento da newbie!

Ciao, sara' un banalita', ma qual'e' il metodo piu' elegante per
spacchettare una stringa in sottostringhe a lunghezza fissa su un
array?
es. data "AABBCCDD" -> spacchettata a 2 caratteri -> (AA,BB,CC,DD)
Grazie!
Daniele

 es. data "AABBCCDD" -> spacchettata a 2 caratteri -> (AA,BB,CC,DD)
 @array = unpack( "(a2)*", $string );
MM


usa un'espressione regolare che prende due caratteri, con la clausola /g.
use Data::Dumper
my $testo="AABBCCDD";
my @array = $testo =~ /(..)/g;
print Dumper \@array;
output:
$VAR1 = [
          'AA',
          'BB',
          'CC',
          'DD'
        ];
ciao
gmax
-- 
 _  _ _  _
(_|| | |(_|><  The Data Charmer
 _|
http://datacharmer.org/

 es. data "AABBCCDD" -> spacchettata a 2 caratteri -> (AA,BB,CC,DD)
Le soluzioni più corrette ed efficienti sono già state fornite.
Ma, giusto per onorare il TIMTOWTDI:
my @array = grep {$_} split /(..)/, $stringa;
Ciao,
Emanuele.

Ciao,
innanzitutto grazia a tutti per le soluzioni proposte.
Avendo quindi una stringa che non e' impacchettata semplicemente a
coppie, ma con campi di varia lunghezza, e' corretto un...
my @array2 = $_ =~ /(.{30})(.{8})(.{9})/;
(togliendo il "g"lobal dall'espressione visto che il questo caso il
numero dei caratteri e' predeterminato in 47 bytes)?
Daniele

 my @array2 = $_ =~ /(.{30})(.{8})(.{9})/;
Mi sembra corretto.
Ad ogni modo, per queste operazioni, 'unpack' dovrebbe essere più
efficiente:
  my @array2 = unpack("a30a8a9"); #assumendo che la stringa sia in $_
Max

Daniele L. wrote:

Perfetto :-)
Se vuoi puoi anche aggiungere dei vincoli posizionali agli estremi della 
regex, che la velocizzano leggermente e ti permetterebbero anche di 
intercettare eventuali errori sulla lunghezza totale della stringa:
my @array2 = $_ =~ /^(.{30})(.{8})(.{9})$/;
Unpack sarebbe ancora più efficiente, come diceva Max (di circa un 20%, 
secondo alcune prove che feci tempo fa su un problema del tutto analogo).
Se invece devi fare un'estrazione character-based (potendo la tua 
stringa contenere anche caratteri estesi), la regex è probabilmente 
preferibile, perché funzionerebbe inalterata (mentre con l'unpack 
dovresti adattare il template e/o fare altre operazioni).
Ciao,
Emanuele.

 my @array2 = $_ =~ /(.{30})(.{8})(.{9})/;
Un'altra piccola osservazione: la regex di default viene applicata a $_, 
per cui la riga di sopra potresti scriverla semplicemente cosě:
my @array2 = /(.{30})(.{8})(.{9})/;
che comporterebbe anche un (impercettibile) vantaggio prestazionale.
Ciao,
Emanuele.
Newsgroup: it.comp.lang.perl
Titolo: Qualcuno conosce server gratuiti per sperimentare i CGI?





Salve...


Qualcuno puo' gentilmente indicarmi quali sono i 
server che ospitano pagine con cgi in modo gratuito? Escluso il deludente 
Tripod?


Grazie in anticipo.


Roberto Bisciaio


 



 wrote in 
  message 001001c002f8$857ed280$37fa1b97@roberto...








www.mycgiserver.com


 


non l'ho provato, ne ho solo sentito 
parlare




"Roberto Bisciaio"
 ha scritto nel 
    messaggio <001001c002f8$857ed280$37fa1b97@roberto>...


www.f2s.com
(niente pubblicità, niente controllo contenuti, un dominio di quarto livello,
estensioni FrontPage 2000, MySQLServer e altra roba che non ricordo)
ma qualche tempo fa sembrava avesse esaurito i posti disponibili


...


www.mycgiserver.com


 


non l'ho provato, ne ho solo sentito 
  parlare




"Roberto Bisciaio"
 ha scritto nel messaggio 
    <001001c002f8$857ed280$37fa1b97@roberto>...


Salve...


Qualcuno puo' gentilmente indicarmi quali sono 
    i server che ospitano pagine con cgi in modo gratuito? Escluso il deludente 
    Tripod?




Newsgroup: it.comp.lang.perl
Titolo: excessive paranoia

Ho un errore CGI che non ho capito:
The crypt() function is unimplemented due to excessive paranoia. at
C:\InetPub\wwwroot\treatise\admin.cgi line 54.
Chi e' il PARANOICO? Io o il sistemista? Chi ha sbagliato cosa?
Ho installato WinNT 4.0, IIS, ActivePerl bind 522 (perl 5.005_03).
Grazie anticipatamente
Maurizio

 wrote in message news:...

Newsgroup: it.comp.lang.perl
Titolo: Nessuno di Voi sa come.....

Gestire due campi password e login per verificare la presenza
dell'utente tra gli user di un sistema linux?
se si vi prego di riscrivermi Grazie
Mello
--
Automatic posted from [212.210.113.194]
via Mailgate Server - 
http://www.mailgate.org

 dell'utente tra gli user di un sistema linux?
Se cerchi nelle pagine di manuale di Perl l'esempio per la funzione crypt,
c'e' un pezzo di codice che potrebbe fare a caso tuo.
-----------------------------------------------------------------------------
  $man perlfunc
      ....
    crypt PLAINTEXT,SALT
      ....
 
       Here's an example that makes sure that whoever runs this
       program knows their own password:
       $pwd = (getpwuid($<))[1];
       $salt = substr($pwd, 0, 2);
       system "stty -echo";
       print "Password: ";
       chop($word = <STDIN>);
       print "\n";
       system "stty echo";
 
       if (crypt($word, $salt) ne $pwd) {
            die "Sorry...\n";
       } else {
            print "ok\n";
       }
 
       Of course, typing in your own password to whoever asks you for
       it is unwise.
 
----------------------------------------------------------------------------
Maurizio
-- 
Maurizio M. Munafo' |                            
E-mail:mmmu...@tuttocitta.it
--------------------+---------------------------------------------------------
             (o_    |                              - Gentile or Jew,
   (o_  (o_  //\    | O you who turn the wheel and look to windward,
   (/)_ (/)_ V_/_   | Consider Phlebas, who was once handsome and tall as you.

me...@freemail.it
 wrote:
 >Gestire due campi password e login per verificare la presenza
 >dell'utente tra gli user di un sistema linux?
Cosa c'e` da dire? Usa getpwnam.
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *
Newsgroup: it.comp.lang.perl
Titolo: Sulle espressioni regolari.

Ciao a tutti,
Devo assicurarmi che un imput preso dall'esterno sia untaint.
L'imput e' un dominio, un path/nomefile e un indirizzo di e-mail.
Come riportato in perlsec ho fatto:
if ($dominio =~ /^(xxx)$/) {
$dominio = $1
} else {
die ....
}
dove xxx e' [\d\w.:]+ per il dominio, [-\d\w.\/_]+ per il path/nomefile
e [\d\w\@._-]+ per l'email.
Secondo voi e' corretto? Mi assicuro cosi' che sono effettivamente
untaint?
Grazie e ciao
Luca
e-mail: 
l.sa...@3it.it
 (work)
e-mail: 
lr.sa...@flashnet.it
 (home)
ICQ #: 33946022

 untaint?
 Certo. Tecnicamente sono untainted.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 "Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)
--
----->KaBooM<-----
Luca Satolli
Work
URL: 
http://www.3it.it
e-mail: 
l.sa...@3it.it
Home
URL: 
http://village.flashnet.it
~/fn073993
e-mail: 
lr.sa...@flashnet.it
ICQ #: 33946022

 Ditemi se mi sbaglio
Ne abbiamo parlato qualche giorno fa (dovresti trovare ancora in giro il
thread su MailGate): in un indirizzo di e-mail puo' starci TUTTO,
specialmente se chiuso tra virgolette:
 "Mr. Oizo @ Home"@
pippo.it
 e' un indirizzo valido.


 wrote in message
7m38m8$pfb$1...@menelao.polito.it...

Scusate l'intrusione tardiva, ma non ho resistito all'impulso di dirti che
uno che sceglie un indirizzo come "Mr. Oizo @ Home"@
pippo.it
  merita, e dico
MERITA, di non ricevere un tubazzo di posta.
Un esempio piu' realistico e' del tipo
"
nando%mypc.intrane...@azienda.it
" per coloro che hanno solo un
account intranet.
Nando.

 wrote:
: Scusate l'intrusione tardiva, ma non ho resistito all'impulso di dirti che
: uno che sceglie un indirizzo come "Mr. Oizo @ Home"@
pippo.it
  merita, e dico
: MERITA, di non ricevere un tubazzo di posta.
L'indirizzo e` corretto e standard, che sia difficile da parsare e` un
altro conto.
Se poi vogliamo eliminare tutte le cose difficili basta proporre una
modifica all'RFC relativo...
-- 
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) mail (dot) ipers (dot) net   for my PGP public key
Home: 
http://www.ipers.net/~nandos

MERITA, di non ricevere un tubazzo di posta.
Beh, RFC 822 permette questo e anche molto peggio. Per esempio potrei
usare questo indirizzo anti spam (perfettamente funzionante), ma molti
MTA non riescono a gestirlo:
@(Marco)linux(d'Itri).it:md(@
fbi.gov
)
Comunque la regexp per verificare un indirizzo e` lunga circa cento
righe.
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *
Newsgroup: it.comp.lang.perl
Titolo: Installare DBI e DBD::Oracle

Vorrei installare DBI e DBD su una macchina unix: bisogna farlo per
forza da root? (penso che la risposta sia sě..ma mi piacerebbe fosse il
contrario)
Grazie
 Andrea
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 contrario)
A memoria:
perl Makefile.PL --prefix=/tuopath
e dopo aver installato (senza essere root visto che su /tuopath puoi 
scriverci)
nel tuo script, da qualche parte aggiungi:
BEGIN {
	push @INC,"/tuopath";
}

 }
Grazie!!
 Andrea
(Speravo ci fosse una cosa del genere!)


Newsgroup: it.comp.lang.perl
Titolo: numero di riga

salve a tutti!
problema: in un mio scriptino voglio che in caso di errore venga loggata
la causa e anche il numero di riga dello script in cui avviene il misfatto.
C'è un modo semplice, tipo una variabile predefinita, che contenga il
numero della riga dello script che è in esecuzione?
vorrei fare una cosa del tipo 
fuzione() || logga( $numero_riga_corrente, "baubau yada yada");
saluti!
ar

 numero della riga dello script che è in esecuzione?
La variabile è __LINE__
In particolare prova a dare un occhio alla documentazione della funzione
die (perldoc -f die oppure
http://www.perl.it/documenti/perlfunc/view.html?func=die
 ) nella quale
ci sono degli esempi di come puoi "loggare" nome del file e numero di riga.

 
andrò a vedere!
Dove posso trovare una lista con tutte le variabili tipo __FILE__, __LINE__...
su perlvar non le ho trovate...
ciao ciao!
ar

 su perlvar non le ho trovate...
perldoc perldata
oppure
http://pod2it.sourceforge.net/pods/perldata.html
Ciao!

Newsgroup: it.comp.lang.perl
Titolo: $_

Ciao a tutti,
qualcuno mi puo' spiegare il significato di: $_
Grazie
Corra_

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

 
 
http://www.perldoc.com/perl5.6/pod/perlvar.html
Nota per Michele Beltrame: proporrei di aggiungere un riferimento a
www.perldoc.com
 nell'apposita sezione delle FAQ.
Max


www.perldoc.com
 nell'apposita sezione delle FAQ.
Grazie Max. Fatto.
	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: Tutorial per PERL

Scusate se vi disturbo con una domanda forse ritrita, ma mi servirebbe trovare
un buon testo per imparare PERL. Voi come lo avete imparato?
L'ideale sarebbe trovare un qualche tutorial o libro sulla rete; ma se proprio
bisogna spendere qualche soldo per libri cartacei, quali mi consigliate? i
"Camel book" e "Llama book" si trovano in Italia?
-- 
Ciao da Mauro
e-mail: 
mazz...@iol.it
home page: 
http://gulliver.unian.it/~mazzieri/

 wrote:
: Scusate se vi disturbo con una domanda forse ritrita, ma mi servirebbe trovare
: un buon testo per imparare PERL. Voi come lo avete imparato?
Dalle man pages :-) all'epoca non esistevano libri sul Perl.
Comunque il metodo economico resta la stampa delle man pages, che sono
molto diverse dalle "comuni" man pages, molto piu` esplicative e
discorsive.
Tieni anche conto che non troverai mai un libro aggiornato quanto le
man pages. Non mi risulta ad esempio che esistano gia` libri sulla
versione 5.005 ...
: L'ideale sarebbe trovare un qualche tutorial o libro sulla rete; ma se proprio
: bisogna spendere qualche soldo per libri cartacei, quali mi consigliate? i
: "Camel book" e "Llama book" si trovano in Italia?
*IL* libro e` il Camel book, il Llama book va bene se sei un
principiante, ma dovrai comunque avere l'altro da usare come
reference.
Poi ci sono testi piu` avanzati (da` un occhiata al sito della
O'Reilly).
I due libri che citi dovrebbero essere stati tradotti in italiano.
-- 
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

mazz...@iol.it
 wrote:
 >Scusate se vi disturbo con una domanda forse ritrita, ma mi servirebbe trovare
 >un buon testo per imparare PERL. Voi come lo avete imparato?
Leggendo il manuale. Lo puoi convertire in HTML con i comandi:
cd /usr/lib/perl5/pod/
for i in *.pod; do pod2html $i --verbose --index \
--podroot=/usr/lib/perl5 \
--podpath=pod:ExtUtils:CGI:CPAN:Net:Term:IO:I18N:HTTP:HTML:MIME:Math:. > \
`basename $i .pod`.html; done
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *
Newsgroup: it.comp.lang.perl
Titolo: non mi si installa GD.pm

mi fa un casino, mi dice un sacco di roba che non c'ho capito, se volete
ve la pasto, pero' e' un sacco di roba
io ho sto perl qua --> This is perl, version 5.005_03 built for
i386-linux
sapete che ne so, se le versioni di GD piu' nuove non sono compatibili
con questa, o che merda so, se copio GD.pm dove c'ho tutti gli altri
modueli funziona???
bho, bau

 ve la pasto, pero' e' un sacco di roba
Ce l'hai le librerie GD, vero?
--
Valerio Granato - 
val...@grana.to
FOR KeyMaster - i2000 Usenet Hierarchy
Maggiori informazioni sulla gerarchia i2000?
http://www.i2000.usenet.it
 - 
in...@i2000.usenet.it

 --
librerie??
io c'ho sto file qua GD-1.30.tar.gz
ho untarrato, mi son letto il README eppero' non va
che librerie servono????
bau

 che librerie servono????
Allora hai
GD.pm -- A perl5 interface to Thomas Boutell's gd library.
Come nella prima riga del README :-)
Poi, nel file README, c'è
===> NOTE: This version of GD REQUIRES libgd 1.8.3 or higher.
Se cerchi infine il file README, ci trovi pure l'URL per scaricarle
:-))))


 :-))))
uh, vero :)))
quel pezzo non l'avevo cagato per niente :)))
ora mi manca da compilare libpng eppoi di sicuro ci sara' qualche altro
problema
bau
Newsgroup: it.comp.lang.perl
Titolo: Upload senza limiti

Ci sono limiti nell'eseguire un upload di grosse dimensioni via cgi?
Parlo di file di 80 - 100 mb.
In php non posso (c'è un limite sul php.ini) mentre in perl sono io a
gestire il cicle di read(... e qundi a calcolare i dati ricevuti e
quindi (in teoria) a non limitare la dimensione massima.
Ma prima di cominciare a sbattere la testa sullo script, volevo essere
sicuro che non ci siano problemi, tipo Apache che interviene perchè è
passato troppo tempo o perchè lo script ha ricevuto troppi byte...



PHP, Perl, ecc., sopra tytti c'è la direttiva Apache 'LimitRequestBody' per
limitare il numero massimo di bytes inviabili nel corpo di una request.
Personalmente 100 MB mi sembrano un po' tantini e, anche se non conosco la tua
applicazione, potrebbe costituire un porta per un attacco di tipo "denial of
service"
by
	- Enrico
--- have fun with 
www.perl.it
 ---

service"
Devo permettere l'upload di foto di grandi dimensioni (in un'area
riservata e a utenti "sicuri").
Mi servirebbe anche per "trasmettere" dati a un cgi da parte di un
client per una radio via http...
Cmq, nel mio http.conf non esiste questa direttiva: sai se va aggiunta
manualmente o si trova attivata di default? Lo script andrà su un
servizio di hosting e non potrò controllare il file http.conf.
Grazie.

 riservata e a utenti "sicuri").
Io ho fatto una cosa simile, ma non ho usato il metodo POST normale
ma piuttosto:
<FORM ACTION="/cgi-bin/
pubblicazione.pl
" ENCTYPE="multipart/form-data"
METHOD="POST">
quindi la prima scelta tecnologica e' lato browser.
I dati uplodati cosi' non solo codificati tutti su una linea  nella
forma:
HEADERS-HTTP: VALUES
....
ciao%20mondo%21
ma in modo piu' complesso, direttamente in binario prefissati da
nomefile e tipo mime e marcati da lineavuota-boundary.
Inoltre si possono uplodare piu' binari, tutti prefissati allo stesso
modo.
Prova con la form su descritta a ricevere e vedi la struttura, oppure
cerca ENCTYPE="multipart/form-data con google.
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

METHOD="POST">
[...]
Si, lo so: si fa cosě per inviare dei file col tag input dei form.
Io chiedevo se questi dati, poi, sono sottoposti ad una qualche
limitazione, sia di byte che di tempo di esecuzione.
Riesco ad inviare i dati, ma dopo un pň la connessione cade e volevo
capirne il motivo.
Newsgroup: it.comp.lang.perl
Titolo: Activestate perl + IIS

Salve, volevo comunicare un mio dubbio; riguarda direttamente IIS ma
poichè la risposta è abilitante per l'uso di perl chiedo qui perchè
forse qualcuno ha esperienza in proposito e magari vuole condividerla
con me.
<NO HOLY WAR> Piattarforma: Microsoft NT/2000/2003 
Web server Microsoft IIS N.M con N in [5,6] </NO HOLY WAR> 
Logica server side: Activestate Perl 5.N.M con N in [6,8] 
natura del dubbio. Gli script vanno in esecuzione  in CGI-BIN.
E' possibile impostare IIS in modo che richieste effettuate sul nome
di dominio (e quindi senza precisare nome dello script) mandino in
esecuzione uno script perl in cgi-bin *senza usare redirect*, che non
piace ai motori di ricerca?
Voglio essere sicuro di essermi spiegato bene. Da IIS posso impostare
il fatto che richieste ad www.anything.whatever restituiscano un
documento qualunque di default dalla cartella mappata sulla home. Ma
come posso fare se voglio che le richieste ad www.anything.whatever
attivino lo script cgi-bin/
isme.pl
 senza dover effettuare un redirect
come ad esempio un default.asp che richiama cgi-bin/
isme.pl
 ?
Un'altra domanda (may I?) 
Ho notato che la gestione del path in uno script cgi è quantomeno
problematica. Sono rimasto piuttosto stupito dal fatto che il comando
print cwd piazzato all'interno di uno stesso script in tre cartelle
diverse:
/cgi-bin/
zot.pl
/father/cgi-bin/
zot.pl
/aunt/father/cgi-bin/
zot.pl
restituisce sempre lo stesso path in una situazione di normale
interprete activestate out of process (non parlo delle stranezze e
idiosincrasie di PERLIS e di PERLEX)
Questa situazione fa ovvimaente diventare matti nel localizzare
risorse. Qualcuno ha una spiega e delle contromisure?
Ciao

 restituisce sempre lo stesso path 
Non mi stupisce affatto. Vuol dire che lo script viene eseguito con la
stessa CWD. Presumibilmente, però, $0 conterrà il percorso completo dello
script, diverso in ciascuno dei tre casi.
Max

Newsgroup: it.comp.lang.perl
Titolo: chiamata al sistema: 2 opzioni

ciao
quali sono i pro e i contro delle 2 seguenti chiamate al sistema?
In cosa differiscono?
system( $cmd );
`$cmd`;
grazie
 Raffaello

 `$cmd`;
Le sintassi con le backticks (o la variante 'qx//') ti consente di catturare
l'output del comando, 'system' no. 
'system' ti permette di specificare gli argomenti come un array, le
backticks no.
Max
Newsgroup: it.comp.lang.perl
Titolo: Metodo get e post

Ho bisogno di creare un gci che legga i file inviati da un form e li
inserisca in un file txt, devo inserire qualche istruzione per dire allo
script che arrivano dei dati da un form o mi basta creare una variabile da
far riempire con i dati ( solo un indirizzo e-mail)?
Grazie 1000 e scusate la confusione.


wrote:

Devi usare il modulo 
cgi.pm
, per le istruzioni esegui "perldoc cgi"
Ciao
Andrea Busia
No Spam, Grazie.

 wrote in message
1lSLOPT8OoNMv9...@4ax.com...


Questo su Unix/Linux ma su w98?
E' ESATTAMENTE la stessa cosa.


 wrote in message
8iyQOIvqCbAEyo...@4ax.com...


Cmq mi e' stato consigliato il metodo get voi cosa ne dite (inseperto).
Il modulo è compreso nell'installazione standard quindi lo avevi già.
Comunque per le istruzioni hai due possibilità:
Per il formato html vai in perl\5.005\html\lib e apri cgi.htm, oppure
vai su esegui e scrivi "perldoc cgi".


Newsgroup: it.comp.lang.perl
Titolo: filtrare " dentro una stringa

    ciao a tutti, ho una variabile che può contenermi caratteri tipo ' 
(apice) " (doppio apice), come faccio a filtrarla in modo che non mi dia 
problemi durante la creazione a runtime di una query sql?? come dovrei 
trasformare l'apice e il doppio apice??
Simone 


Non trasformare nulla!
Semplicemente nella tua query usa i placeholder (e, se occorre, usa 
l'operatore q{} per quotare i tuoi bind-values):
http://search.cpan.org/~timb/DBI-1.48/DBI.pm#Placeholders_and_Bind_Values
Ciao,
Emanuele.