mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: Perl + Unix + socket

Mi trovo a dover operare su un server Unix.
Utilizzando il Perl dovrei aprire una socket per mettere in comunicazione il
server con un altro computer.
Mi sapreste dire quale routine si può utilizzare?
Io per ora ho usato questa ma sul server Unix non funziona! :-(
#!/usr/bin/perl -w
use strict;
use Socket;
my ($remote,$port, $iaddr, $paddr, $proto, $line);
$remote  = shift || '212.171.162.243';
$port    = shift || 2000;
if ($port =~ /\D/) { $port = getservbyname($port, 'tcp') }
&error0 unless $port;
$iaddr   = inet_aton($remote) || &error1;
$paddr   = sockaddr_in($port, $iaddr);
$proto   = getprotobyname('tcp');
socket(SOCK, AF_INET, SOCK_STREAM, $proto)  || &error2;
connect(SOCK, $paddr)    || &error3;
send(SOCK, "provaXXX",0) || &error4;
my $rtime=' ';
recv(SOCK, $rtime, 1, 0)        || &error5;
print "Content-type:text/html\n\n";
print "<html><body>L'esperimento e' libero</body></html>";
close (SOCK)            || &error6;
exit;

 
Salve,
  nn mi sembra di vedere problemi, forse se tu ci dicessi in che senso
'non funziona' si potrebbe fare di piů. Non si connette? Esegue una delle
sub di errore? se si quale?
Ciao
-- 
Leo TheHobbit |  One Ring to rule them all.   |
IRCnet #roma2 |      One Ring to find them,   |
ICQ 56656060  |  One Ring to bring them all   |
              |  and in the darkness bind them|
              |     In the Land of Mordor     |
              |      where the Shadows lie.   | a.d. VII Kal. Mai. MMDCCLV AUC

 ha scritto nel messaggio
news:aa8vds$r2b$1...@wanadoo.fr...


 esegue sempre la sub error3, quella relativa alla connect.
hmmm... Sei sicuro che l'indirizzo sia giusto e che tuo sia autorizzato a
connettertici? Prova a rimipazzare la sub error3 con un più classico
  die "Impossibibile aprire la connessione: $!"
La variabile standard $! contiene il messaggio d'errore sistema e
dovrebbe dirci dove è il problema.
Cheers


 dovrebbe dirci dove č il problema.


 riescano a funzionare sotto Unix?
No, non credo... La cosa	 più probabile è che la rete sia mal configurata
sulla macchina winzoz... Prova a connetterti al server in questione, sul
porto TCP che devi usare, usando il programma telent di winzoz...
Ciao
-- 
Leo TheHobbit | Elen síla lúmenn' omentielvo |
IRCnet #roma2 |         Elvish greeting      |
ICQ 56656060  |                              |  a.d. VII Kal. Mai. MMDCCLV AUC
Newsgroup: it.comp.lang.perl
Titolo: perl (conky) e count dei nuovi messaggi gmail/IMAP

Ciao,
utilizzo conky per monitorare il mio portatile ed avevo bisogno di uno 
script per vedere (sempre attraverso conky) il numero dei messaggi non 
letti nella mia casella su gmail/IMAP.
Posto questo mini script che ho fatto (magari fa comodo a qualcuno).
gimap.pl
-----------------------------------------------------------------------
#!/usr/bin/perl
# 
gimap.pl
 by gxmsgx
# description: get the count of unread messages on gmail imap
use strict;
use Mail::IMAPClient;
use IO::Socket::SSL;
my $username = 'example username'; # 
example....@gmail.com
my $password = 'password123';
my $socket = IO::Socket::SSL->new(
   PeerAddr => '
imap.gmail.com
',
   PeerPort => 993,
  )
  or die "socket(): $@";
my $client = Mail::IMAPClient->new(
   Socket   => $socket,
   User     => $username,
   Password => $password,
  )
  or die "new(): $@";
if ($client->IsAuthenticated()) {
	my $msgct;
	$client->select("INBOX");
	$msgct = $client->unseen_count||'0';
	print "$msgct\n";
}
$client->logout();
-----------------------------------------------------------------------
su crontab:
* * * * * ~/scripts/
gimap.pl
 > ~/.email/gimap.ct
sul file di configurazione di conky (~/.conky/conky.conf):
${color1}E-mail: ${color2}gmail ${color1}(imap): ${color3}${execi 20 cat 
~/.email/gimap.ct} ${color2}new
gimap.pl
 - conky screenshot: 
http://i30.tinypic.com/ifbrsx.png
Conky home page: 
http://conky.sourceforge.net/

Errore ovvio, per chiarezza lo segnalo comunque.
Nella riga d'esempio ho omesso il punto nello username:
per una casella tipo "
example....@gmail.com
" lo $username sara':
my $username = 'example.username';

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

Salve,
non riesco a trovare da nessuna parte informazioni su sendmail.
Conoscete qualche sito di riferimento?
In particolare, mi serve sapere come si invia un file in attach con sendmail
e perl.
(Come si richiama da perl e come si invia un normale messaggio l'ho capito,
ma non riesco ad inviare immagini .gif)
Grazie
Alberto

 ICQ# 1980563

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

 l'MTA (sendmail) e molto con l'MUA (il programma perl, in questo caso).
dove trovo la FAQ su come mandare e-mail in attachment usando sendmail?
grazie
--
demis

 
Dunque, quello che ti serve non è tanto sapere come usare sendmail
(sendmail non ha nessuna cognizione di cosa sia un attachment, quindi non
c'è nessuna differenza rispetto a una mail di solo testo).
Quello che devi in sostanza fare è preparare una mail in formato MIME che
contenga un attachment e darla in pasto al sendmail tramite la solita
pipe.
Il README del module MIME::Lite ti spiega tutto per filo e per segno.  
http://search.cpan.org/doc/ERYQ/MIME-Lite-1.135/README
Max

Newsgroup: it.comp.lang.perl
Titolo: Aiuto su script di uu-decoding

Ho trovato questo semplice script tra i files dell'Active Perl build519,
nella directory eg.
Nella mia shell dos (anzi: 4DOS) sotto Win98 non funziona.
Mi sembra che scriva, erroneamente, un CR/LF al posto di ogni LF (o CR),
dunque
il file binario uu-decoded e' addirittura di lunghezza errata!
Qualcuno mi saprebbe suggerire una correzione affinche' si possa usare
questo script anche su PC?
Grazie a tutti
Matteo - Milano
#!/usr/bin/perl
while (<>) {
    next unless ($mode,$file) = /^begin\s*(\d*)\s*(\S*)/;
    open(OUT,"> $file") || die "Can't create $file: $!\n";
    while (<>) {
     last if /^end/;
     next if /[a-z]/;
     next unless int((((ord() - 32) & 077) + 2) / 3) ==
      int(length() / 4);
     print OUT unpack("u", $_);
    }
    chmod oct($mode), $file;
    eof() && die "Missing end: $file may be truncated.\n";
}

 ICQ# 1980563

Newsgroup: it.comp.lang.perl
Titolo: Capire i Socket

Devo dire che una delle mie grandi lacune in Perl e l'utilizzo deo 
Socket 
Infatti non ho ancora ben capito il loro meccanismo client/server (per 
me un meccanismo ancora astratto) 
chiedo lumi a voi! 
Ad esempio quale sarebbe la strada da intraprendere se volessi 
programmare una chat in perl (non browser) con i socket di tipo point to 
point? 
Grazie

Questo  è un pò di codice di esempio che ho fatto leggendo in giro un pò 
in materia di Socket e Thread
[code]
use strict;
use warnings;
use IO::Socket::INET;
use Thread;
$t1 = Thread->new( \&client);
$t2 = Thread->new( \&server);
sub client {
  my ($socket,$answer);
  $socket = IO::Socket::INET->new("
127.0.0.1:2000
")
    or die "Couldn't connect to port 2000 of 127.0.0.1 : $!";
  # send something over the socket,
  print $socket "Why don't you call me anymore?\n";
  # read the remote answer,
  $answer = <$socket>;
  # and terminate the connection when we're done.
  close($socket);
}
sub server {
  my ($server,$client);
  $server = IO::Socket::INET->new(LocalPort => 2000,
                                Type      => SOCK_STREAM,
                                Reuse     => 1,
                                Listen    => 10 )   # or SOMAXCONN
    or die "Couldn't be a tcp server on port 2000: $!\n";
  while ($client = $server->accept()) {
      # $client is the new connection
  }
close($server);
}
[/code]
potrei connettermi a me stesso? (127.0.0.1) e su che porta?
so che dovrei mettere un while(1) ma non so  dove...
instanto, secondo voi come prima bozza ci può stare? voglio dire se il 
concetto è quello giusto...
grazie
Newsgroup: it.comp.lang.perl
Titolo: Domanda su file

Ciao Tutti,
Il dubbio che ho e` sicuramente una banalita`, ma ho fatto uno scriptino che
purtroppo non funge.
Il comando
open(OUT,">>nome-file");
se non esiste il file nome-file lo crea? Oppure cosa?
Grazie
Andrea
-- 
 "Who needs Windows and Gates in a  | Andrea Serafino
  world without walls and fences?"  | e.mail: 
aser...@geocities.com

 se non esiste il file nome-file lo crea? Oppure cosa?
  Si, lo crea da solo e automaticamente aggiunge i dati alla seconda richiesta.
Ciao,
 Pirluigi

se non esiste il file nome-file lo crea? Oppure cosa?
open OUT, ">nome-file" inizializza il file (cancella contenuto precedente)
open OUT, ">>nomefile" apre il file in modalità append
sei sicuro di avere i permessi per creare un file nella dir ?
Stefano Pisani

Newsgroup: it.comp.lang.perl
Titolo: sito per principianti ?

Sapte undicarmi un sito per principianti con tutorial sul Perl
cercando su Google ne ho trovatia migliaia , ma io ne vorrei uno con
esempi di programmazione passo passo (ogni riga spiegate in dettaglio)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 esempi di programmazione passo passo (ogni riga spiegate in dettaglio)
A mio avviso la migliore cosa per te, se sei un Principiante con la P
maiuscola e' di prendere il sommo libro con il cammello (Learning Perl).
All'inizio aiuta moltissimo.
Poi la pratica e' importante, fai dei programmini per "vedere che succede
se metto questo qui invece di qua".
spero di esserti stato d'aiuto.
 Raffaello


Vai su 
www.hyperbook.it
   c'e' un libro gratis da scaricare in italiano,
ottimo !!!!!

grazie 1000!
gratis ..quanto amo questa parola!


 maiuscola e' di prendere il sommo libro con il cammello (Learning Perl).
Il libro col cammello e' Programming Perl... Learning Perl ha un lama e 
Learning Perl on Win32 ha un geco...
Interessante simbologia ;-)
-- 
Paolo "Razor" Greco
IPL MUD - 
http://razor.tera.it/
($work,$life) = split (/$/, $time) unless $money > 10000000;
Newsgroup: it.comp.lang.perl
Titolo: system ("cp * /target) non funziona

ho uno script cosě:
#!/usr/bin/perl -U
system("cp /modelli/* /target");
č flaggato +s
questo script via web/cgi non funziona e mi trovo nell'error_log un
errore "cp: cannot create regular file '/target/nomefile': permission
denied
il  bello č che se sostitusico * con un nome file lo script funziona
anche via web!
la versione di perl č la 5.6.0
se lancio lo script da terminale come root funziona benissimo...
any idea ?
-- 
--------------------------------------------------------------------------
Hosting professionale a prezzi USA ?
http://www.servitelit.com/prezzi.htm
Registrazione domini a Lire 50.000 ? 
http://domini.servitelit.com
--------------------------------------------------------------------------

...

L'errore te lo genera probabilmente il fatto che la cp non copia le
directory, se ne trova una nella dir. modelli non la copia.

directory, se ne trova una nella dir. modelli non la copia.
Aggiungo che, se il caso e` questo, basta utilizzare "cp -R". ;)
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!

Newsgroup: it.comp.lang.perl
Titolo: Aggiornare un file

Come devo fare per aggiornare il contenuto di un file di testo????
Mi spiego meglio:
Ho un file con scritte delle stringhe all'interno........Il problema è
sostituire una certa stringa con un'altra attraverso un prog. scritto in
Perl.........
                    Grazie Antonello mailto:
a.al...@sistemi.it



 wrote:
: Come devo fare per aggiornare il contenuto di un file di testo????
: Mi spiego meglio:
: Ho un file con scritte delle stringhe all'interno........Il problema è
: sostituire una certa stringa con un'altra attraverso un prog. scritto in
: Perl.........
Si fa con un one-liner:
$ perl -i.bak -pe 's/stringa1/stringa2/g' file
Il file originale viene rinominato con l'aggiunta di un ".bak".
Se vuoi puoi ottimizzare la velocita` a scapito dell'occupazione di
memoria, caricando l'intero file da modificare nella RAM:
$ perl -0777 -i.bak -pe 's/stringa1/stringa2/g' file
-- 
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: 2 domandine facili facili su sendmail

\n";
print MAIL "Subject: Test\n\n|";
print MAIL "Questo e` il messaggio!";
close (MAIL);
mi domandavo 2 cosucce (immagino che per voi siano banalità, ma è da poco
che mi occupo di perl):
1) è necessario il simbolo | dopo "subject: Test\n\n"? (ho guardato altri
script e non ve ne è traccia)
2) è possibile che il messaggio sia spezzettato in più comandi print? (credo
di si, ma non si sa mai!)
(es:
print MAIL "primalinea\n"
print MAIL "secondalinea\n")
scusate per la banalità delle domande, ma purtroppo è un problema testare
sendmail con windows 98 e omnihttp (c'è da superare un piccolo scoglio,
sendmail non esiste in windows!!!!)
Grazie
SK

1) si
non sono sicuro che | sia necessario ma io l'ho visto cosi' anche in diversi
scripts non miei, ti da noia?
2) si
idem come sopra , io uso dei pezzi di script scopiazzati e le mail che mando
usano una serie di print
esempio:
open (MAIL,"|/usr/sbin/sendmail -t");
    print MAIL "To: $Destinatario\n";
    print MAIL "From: ($Mittente)\n";
    print MAIL "Subject: $Titolo\n\n";
    print MAIL "blablablabla\n";
    print MAIL "blablablabla\n";
    print MAIL "blablablabla\n\n";
    print MAIL "Distinti Saluti";
    close (MAIL);

 sendmail non esiste in windows!!!!)
Questo si' che mi sembra un bel problemuccio!!!
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/

 ciao, marco
Grazie ad entrambi,
ora che so  la risposta mi rendo conto ancora di piů che erano proprio delle
cavolatate come domande (sopratutto la seconda!!)
Ciao, alla prossima!!
SK

Newsgroup: it.comp.lang.perl
Titolo: C o PERL???

Per creare un CGI cos'è meglio utilizzare perl o c?
TKS

Per creare un CGI cos'è meglio utilizzare perl o c?
Io utilizzerei il Perl, e` piu` comodo.
	Michele.
-- 
Michele Beltrame
mi...@io.com
http://www.io.com/~mick/
Newsgroup: it.comp.lang.perl
Titolo: Contents Scanning tramite regular expression

Problema:
Devo effettuare un Contents Scanning della posta.
Attraverso  il paradigma ECA(Event Condition Action) devo poter, a seconda
del contenuto ritenuto + o - valido, effettuare delle azioni (avvisare
l'amministratore di sistema, il destinatario e/o il mittente).
Richiesta:
Sapreste consigliarmi qualche tool/programma Contents Scanning tramite
regular expression.
Thx a Lot
xevious
----------------------------------------------
"Chiunque tu sia: una sera fa un passo
    fuori dalla tua casa, che conosci cosi' bene.
          Lo spazio immenso è vicino..." (Rilke)

 regular expression.
se ho capito la richiesta, per lo scanning di virus, su CPAN trovi:
http://search.cpan.org/author/HDIAS/File-Scan-0.36/
da cui puoi trarre spunto, da abbinare magari con:
http://search.cpan.org/author/VPARSEVAL/Mail-MboxParser-0.35/
Potrebbero interessarti anche:
http://search.cpan.org/author/DCOPPIT/grepmail-4.72/
per cercare mail via espressioni regolari
e per lo scanning di virus direttamente nelle email c'è un vecchio 
modulo:
http://search.cpan.org/author/JWIED/Mail-IspMailGate-1.1013/
Cmq, cerca sempre su: 
http://search.cpan.org
-- 
$_=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
Newsgroup: it.comp.lang.perl
Titolo: sapere quante volte è in esecuzione un programma perl

Salve a tutti
C'č il modo di sapere quante volte č in esecuzione un programma perl sotto
unix ?
Del tipo se il programma si accorge che c'č un altro processo o piů processi
che lo hanno
lanciato č possibile decidere all'interno di questo se continuare
l'esecuzione ???
Devo fare un programma che puň essere lanciato al massimo da due o tre
utenti alla volta.
Grazie mille
Alessandro

 wrote in message
7q49i4$3n6$1...@fe1.cs.interbusiness.it...


 unix ?
(es. non piů di 3 processi)
$processo = 'nome del processo';
@lista = `ps aux | grep $processo | grep -v grep`;
die "$processo: too many processes" if  $#lista >= 2;   
-- 
- Claudio Della Ciana <pynhqvbq...@rznvy.pbz>
- apply a rot13 to get real address

Newsgroup: it.comp.lang.perl
Titolo: Aiuto sono un principiante

Mi vorrei avvicinare alla programmazione perl ho cercato di utilizzare degli
script trovati free su internet il problema è che trovo spesso la dicitura
"Create the directory and set the permissions on it to 777 (fully writable).
" o similari ( 775 ) purtroppo io non sò come si possa settare questi
permessi mi chiedevo se è una cosa che si può spiegare facilmente o che
magari si possa reperire spiegazioni via internet .
Un grazie in anticipo Adriano

Fai eseguire questi script su un server remoto ? In questo caso se carichi
gli script tramite FTP  puoi impostare il permesso tramite una opzione del
programma FTP che usi.
es. con Cute FTP 4 basta cliccare col tasto destro del mouse sul file o
directory  caricato in remoto e cliccare quindi su CHMOD
Se li fai eseguire sul tuo sistema Linux, clicchi col destro del mouse
sul''icona della direcotry o file  scegli propietà (property), quindi
permesso.
Ciao.

 permesso.
se invece sei in windows dei permessi te ne puoi fregare. o sbaglio?
claves
claves.d...@netbusiness.it

 ha scritto nel messaggio
news:9dr7t8$c7l$1...@nreadB.inwind.it...


Newsgroup: it.comp.lang.perl
Titolo: Installare moduli in Mac OS X

Salve,
ho Mac OS X e Perl 5.8.1, ho installato tramite cpan GD e Gtk2, ma non
riesco ad installare Gtk e Tk.
Ottengo più o meno questi errori:
---
«Failed 43/46 test scripts, 6.52% okay. 2082/2504 subtests failed,
16.85% okay.
make: *** [test_dynamic] Error 2
  /usr/bin/make test -- NOT OK
Running make install
  make test had returned bad status, won't install without force»
---
Qualcuno mi saprebbe indicare come fare?
TIA
Salvo
-- 
#!/usr/bin/perl
print "grazie!";

 Qualcuno mi saprebbe indicare come fare?
Esiste una mailing list (in lingua inglese) dedicata a questo
genere di problemi. Se non lo hai gia` fatto, potresti provare
a consultarne gli archivi.
 
http://www.nntp.perl.org/group/perl.macosx
ciao,
S.

 S.
no, la sconoscevo. Ora ci guardo.
grazie, ciao
Salvo
Newsgroup: it.comp.lang.perl
Titolo: Script Per per inviare 5000 e-mail e Ringraziamenti...

Script Perl per inviare 5000 e-mail
Carissimi amici della lista, in passato, studiando faticosamente da
"autodidatta" il linguaggio perl e grazie anche ai vostri consigli, sono
riuscito ad aggiungere interattività al mio sito in una pagina che riportava
un mio libro di poesie
( 
http://www.poetidazione.it/poesie.htm
 ). La cosa, anche se apparentemente
semplice, è stata molto apprezzata e invidiata da altri possessori di siti
letterari anche perchè è lunico sito di poesia pensato in quel modo. Lo
script che genera dinamicamenti le pagine dopo il request lo potrei anche
migliorare... nelle istruzioni all'epoca non misi l'istruzione die che mi
pare di ricordare entra in gioco qualora le cose vanno storte...
Scusate l'intro, ma mancavo da molto (come postatore, beninteso) da questo
NG.
La cosa che chiedo è la seguente. Il mio sito è cresciuto e ho parecchie
e-mail in archivio. Vorrei, utilizzando il mio server e il perl, per mandare
velocemente 2/3000 msg alla volta agli indirizzi della mia ML.Non mi
interessa una ML con tante funzioni, perchè già uso yahoogruppi. Mi basta
sapere come fare, conservando in un file di testo ad es. 3000 e-mail, uno
per riga, ad inviare in automatico msg con il perl.
Vi sarei grato se potete segnalarmi altre che le eventuali istruzioni in
perl, qualche esempio di progr di posta elettronica in perl reperibile in
rete.
Grazie
A. D.
http://poetidazione.it


Il modulo Mail::Bulkmail è ci`o che ti serve... Guarda su CPAN
Ciao
-- 
Leo TheHobbit 
IRCnet #roma2
ICQ 56656060
e-mail: remove 
dont.spam.me
 from above address

 rete.
Due script li trovi qui:
http://www.perlmongers.it/code/CGI
Potresti modificarne il codice (basterebbe un ciclo sull'invio) per
l'invio in massa e/o per farne script da console.
Non sarà il massimo dell'ottimizzazione, ma per incominciare è
probabilmente un aiuto.
-- 
$_=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

 mandare velocemente 2/3000 msg alla volta agli indirizzi della mia ML.Non
dai un'occhiata a questo
http://www.pixzone.com/dev/src/spammer-0.3.tar.gz
dovrebbe fare al caso tuo
-- 
/federico

 > La cosa che chiedo č la seguente. Il mio sito č cresciuto e ho parecchie


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

Salve,
volevo sapere se c'è un modo per cui uno script individui i nomi utente
di chi si è connesso in quel momento ad una directory protetta con
.htaccess.
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 .htaccess.
$ENV('REMOTE_USER')
Oppure via CGI.pm, qualcosa tipo:
$p->remote_user()
Newsgroup: it.comp.lang.perl
Titolo: Passaggio da un server all'altro... Correzione script AIUTO

Carissimi amici,
                            di recente ho trasferito un sito su Aruba. Da
due anni si trovava su di un altro server.
Dentro al sito c'è uno script cgi che deve essere riconfigurato in quanto
ora da errore. Vi sarei grato se mi aiutate. Purtroppo non riesco + a
ricordare bene il perl. Lo studiai allora solo per creare quello script, poi
:-( Spero in futuro di applicarmi di nuovo al linguaggio. Nell'attesa è
gradita una mano... :-)
Questa è la pagina che non funziona:
http://www.poetidazione.it/poesie.htm
Ecco lo script completo:
(In fondo trovate le variabili di ambiente, la root etc.)
#!/usr/local/bin/perl
# author: Alessandro D'Agostini
use CGI;
$query = new CGI;
print "Content-Type: text/html\n\n";
print <<EOF;
<html>
<head>
<title>
- p o e t i d a z i o n e . i t - ecco il risultato della tua richiesta...
</title>
</head>
<BODY>
<font face="Arial">
<H2>POESIE SCELTE...</H2>
<p>
<blockquote>
EOF
;
# zona in questione
if ($art = $query->param('poe'))
 {
  open (ARTICLE, "../htdocs/rivelazione/art.txt");
  while (<ARTICLE>)
    {
     print "$_";
    }
 print "<HR>";
 close (ARTICLE);
 }
 if ($art1 = $query->param('poe1'))
 {
  open (ARTICLE, "../htdocs/rivelazione/art1.txt");
  while (<ARTICLE>)
    {
     print "$_";
    }
 print "<HR>";
 close (ARTICLE);
 }
# (...CUT - si ripete fino a 49")
if ($art49 = $query->param('poe49'))
 {
  open (ARTICLE, "../htdocs/rivelazione/art49.txt");
  while (<ARTICLE>)
    {
     print "$_";
    }
 print "<HR>";
 close (ARTICLE);
 }
# zona in questione
print "\n</p>\n";
print <<EOF;
</blockquote>
<body background="/immagini/shop_bg.gif" link="#6666FF" vlink="#0000FF"
alink="#000000">
</font>
</BODY>
</HTML>
EOF
;
exit;
-------
TEST PERL RIUSCITO -»» LinkAmbientePerl
----------------------------------------------------------------------------
----
Percorso interprete Perl: /usr/bin/perl
Percorso Sendmail: /usr/lib/sendmail
----------------------------------------------------------------------------
----
Variabili d'ambiente
----------------------------------------------------------------------------
----
HTTP_USER_AGENT: Mozilla/4.0 (compatible; MSIE 6.0; Windows 98)
GATEWAY_INTERFACE: CGI/1.1
HTTP_HOST: 
www.poetidazione.it
SCRIPT_NAME: /cgi-bin/test/
ambiente.pl
SERVER_NAME: 
www.poetidazione.it
DOCUMENT_ROOT: /web/htdocs/
www.poetidazione.it/home/
REQUEST_URI: /cgi-bin/test/
ambiente.pl
REQUEST_METHOD: GET
PATH: /usr/local/bin:/usr/bin:/bin
Grazie, Alessandro

 Percorso interprete Perl: /usr/bin/perl
                            ^^^^^^^^^^^^^
A me sembra eloquente.
-- 
                         Maurizio - Tannoiser - Lemmo
                 Founder Member of ERLUG 
http://erlug.linux.it
-------------------------------------------------------------------------------
I rarely saw people sitting at computers producing real code wearing ties.

Chiedo agli esperti forse l'errore è qui?
../htdocs/rivelazione/art1.tx
<FORM ACTION = "\cgi-bin\poesia.cgi" METHOD = "POST">
Newsgroup: it.comp.lang.perl
Titolo: Come ottenere la data?

Ciao
Devo produrre dei campi contenenti la data in formato
GGMMAA
Qual'è la procedura più semplice?
E' possibile farlo senza moduli aggiuntivi?
Ciao

 wrote in message
958402592.
2074789518
@news.tiscalinet.it...

Con :
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
ottieni tutti i parametri che vuoi, basta poi fare una routine che aggiunga
lo '0' ai valori che non hanno raggiunto '10'
Ciao...

Oppure hai anche:
$ora = gmtime;
che ti restituisce data e ora rispetto al meridiano di Greenwich.

 lo '0' ai valori che non hanno raggiunto '10'
oppure:
$aaaammgg = 10000*$year + 100*$month + $day;
ciao :)
    Aram
-----------------------------------------------
Aram Gurekian                     ti.retla@mara
alter.net
 srl               
http://www.alter.it

 Ciao...
Bisogna pero' ricordarsi che $mon ha un intervallo di valori [0 11], mentre
$year e' il numero di anni dal 1900. In poche parole...
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$mon++;
$year+=1900;
altrimenti si possono incontrare spiacevoli conseguenze... :-)
Ciao
	GUndam

 altrimenti si possono incontrare spiacevoli conseguenze... :-)
E' vero scusatemi andavo di fretta e non ho precisato ciao!!!
Grazie Gundam!

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

Qualcuno mi sa consigliare qualche buon libro sul PERL ??

Qualcuno mi sa consigliare qualche buon libro sul PERL ??
Ce ne sono 3, di O'Reilly (
http://www.ora.com
):
 - Learning Perl: introduzione per beginners
 - Programming Perl: la bibbia, l'unico testo veramente indispensabile
   al programmatore Perl
 - Advanced Perl Programming: per capire alcuni "internal" e funzioni
   avanzate.
	Miky.
-- 
Michele Beltrame
mi...@skm.to
http://www.italpro.com/mb/

Newsgroup: it.comp.lang.perl
Titolo: Testatemi il sito

Ragà che ne pensate di questa mia topsites?
Forse il menù java sarà bello ma è fastidioso?
Bò, vedete un pò voi e poi ditemi!
www.matix.freeit.it

 ha scritto nel messaggio
news:9f7tv3$1o5$1...@nreadB.inwind.it...

Newsgroup: it.comp.lang.perl
Titolo: Consigli per libri e gestione matrice.

Salve a tutti!
Sto ripassando (partendo da zero) le poche cose che conoscevo di Perl
perchè è finalmente giunto il momento di iniziare a programmare.
Fin'ora mi sono riletto vecchi appunti (un corso base) e un paio di
guide su internet che arrivano fino alle espressioni regolari e al
pattern matching.
Sapete indicarmi qualche guida più completa e approfondita? O anche
qualche libro!
Almeno per ora non sono interessato all'uso di Perl su server web e
interazioni con MySQL, ma alla programmazione per elaborazione di
stringhe e file di testo. In futuro magari mi applicherò per
interagire con qualche database...
Avrei anche un paio di dilemmi:
Primo: non ho capito bene la differenza tra "my" e "local". Servono,
per esempio, entrambi per definire variabili limitate ad un blocco di
istruzioni di una subroutine? Hanno la stessa funzione?
Secondo:
avendo una matrice (file di testo) di questo tipo:
x 1 2 3 4 5 6
A 1 0 0 1 0 0
B 0 0 0 0 1 0
C 1 1 1 1 0 1
D 0 1 1 0 1 1
(i numeri da 1 a 6 sono le colonne, le lettere A-D sono le righe)
dovrei dividerla in questo modo:
x 1 4
A 1 1
B 0 0
C 1 1
D 0 0
e
x 2 3 5 6
A 0 0 0 0
B 0 0 1 0
C 1 1 0 1
D 1 1 1 1
con le scarsissime conoscenze che ho fin'ora ho pensato che potrei
creare gli array @A, @B, @C e @D (le righe insomma), analizzare uno
per uno i valori dell'array @A e, se il valore è uguale ad 1 prendere
tutti i valori corrispondenti allo stesso indice anche negli altri
array ed inserirli in nuovi array @A1, @B1 etc., se invece il valore
di @A è uguale a 0 potrei far prendere tutti i valori corrispondenti
allo stesso indice di quel valore in @A e metterli in nuovi array @A0,
@B0, e via dicendo.
Scusate la spiegazione abominevole.... ma purtroppo non so come altro
dirlo!
E non ho idea di alternative più semplici o altre funzioni o
trucchetti...
Non vorrei un suggerimento di codice... vorrei riuscirlo a scrivere
io, ma non so se questo sia l'approccio giusto o se ci sono metodi
alternativi più semplici che non conosco (sicuramente ce ne
saranno!!).
In questo caso sapreste indicarmi dove e cosa cercare?
Scusate se mi sono dilungato tanto.
Grazie in anticipo per eventuali consigli!
Ciao!
--
Pippus
www.nighted.com


secondo me assolutamente da leggere quando si studia il Perl.
ciao,
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  Italian Perl Mongers: 
http://www.perl.it


Bene! Ho letto e ho capito. Avevo fatto un po' di confusione perché
avevo trovato dei programmi di esempio con local usato al posto di my.
Qualcuno sa come aiutarmi per la lettura di una riga composta da 0 e 1
separati da virgola o tabulazione?
Come faccio ad inserire ogni numero della riga in una lista o array
diverso?
Grazie!!
Ciao!
--
Pippus
Newsgroup: it.comp.lang.perl
Titolo: come si stampa su file ?

 
 Ciao,
 vorrei salvare in un file postscript una pagina html generate da una
 certa applicatione CGI, e vorrei farlo usando il linguaggio. Questa
 operazione, infatti, dovrebbe essere compiuta molte volte (350 pagine,
 tutte diverse) e, per ovvie ragioni, vorrei evitare di usare il
 convertitore del browser  ;-)
 Ho dato un'occhiata al manuale di CGI.pm-2.36, ma non sembra esistere
 alcuna funzione che consenta di ... "stampare su file".
 Nota: uso LinuX + PostgreSQL.
 Grazie per eventuali suggerimenti.
---
 Sergio

Sergio Brandano <serbr@I_should_put_my_domain_in_etc_NNTP_INEWS_DOMAIN> wrote:
:  vorrei salvare in un file postscript una pagina html generate da una
:  certa applicatione CGI, e vorrei farlo usando il linguaggio. Questa
:  operazione, infatti, dovrebbe essere compiuta molte volte (350 pagine,
:  tutte diverse) e, per ovvie ragioni, vorrei evitare di usare il
:  convertitore del browser  ;-)
Prova HTML::FormatPS . Purtroppo non formatta ancora le tables e le forms.
-- 
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: Ho bisogno di 2 cgi in perl

Ho bisogno di 2 script perl che devono svolgere le seguenti funzioni:
-Il primo deve proteggere una directory (come fa l' http authentication) ma
deve associare ad ogni coppia di user ID e password deve corrispondere un
solo file contenuto nella directory.
-Il secondo deve prendere dei dati (da una tabella .xsl salvata come file di
testo) e restituirli come tabella html.
La tabella puo' essere paragonata ad una tabella comparativa per gli
accessori delle automobili, essa infatti contiene tutti i nomi dei modelli
delle macchine (nella prima colonna) e i codici degli accessori (indicati
nella prima riga e ripetuti nelle righe delle auto che li supportano). L'
utente, inserendo o il nome della macchina o il codice dell' accessorio,
deve visualizzare le righe e le colonne corrispondenti.
Vi sembrano cose difficili da fare?
Potrei svilupparle io che non capisco quasi nulla di perl?
Conoscete qualcuno in grado di darmi una mano o di svilupparle?
Vi prego di rispondere in e-mail all' indirizzo 
nico...@tin.it
 oppure sul
ng ma di non usare il REPLY!!

 Conoscete qualcuno in grado di darmi una mano o di svilupparle?
No.
Saluti,
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

  (che esiste solo se la pagina e' stata autenticata). In pratica ti ritrovi
Forsa la mia domanda non c'entra niente col PERL, ma REMOTE_USER cosa dovrebbe
restituire esattamente?
Il nome? Ma se io proteggo una directory web col comando del server, creando
quindi un solo USER/PSW, a che mi serve controllare REMOTE_USER? O forse è solo
il mio host che mi permette di utilizzare una sola coppia USER/PSW...

 USER/PSW...
Tu volevi far accedere ogni utente ad un singolo file, tra tanti, giusto? 
Se fai autenticare l'utente, puoi dire al CGI (implicitamente) chi e' stato
a chiedere la pagina e fargli restituire esattamente la pagina giusta.


 Tu volevi far accedere ogni utente ad un singolo file, tra tanti, giusto? 
Mi rendo ora conto che la domanda originale di questo thread non era di
Umberto. Scusa l'equivoco.


 wrote in message
80kp5i$4tn$2...@menelao.polito.it...

Newsgroup: it.comp.lang.perl
Titolo: Problema

Ciao A tutti
Ho un problema da proporvi...
Vorrei ridirigere il browser su una pagina x es 
www.yahoo.com
 dopo averne
visualizzata una.
Mi spiego la pagina la visualizzo mediante il modulo CGI ( $query=new CGI;
....)
dopo di che tento di ridirigere il browser con
print "Location: 
www.yahoo.com
 \n\n";
oppure
 $query= new CGI;
 print $query->redirect('
http://www.yahoo.com
 ');
pero' non funziona
NB Da notare che entrambi i metodi funziona se prima non genero con il CGI
una pagina
Sapete qualche soluzione ???

#!/usr/bin/perl
use cgi;
use strict;
$|=1;
  my $query = new CGI;
  print $query->redirect('
http://www.yahoo.com
');
se non ti funziona:
1) Controlla la shebang
2) Controlla che il modulo cgi sia installato correttamente.
3) Verifica che la directory dove risiede lo script sia ExecCGI (httpd.conf)
4) Verifica che sia presente non commentata la riga  AddHandler cgi-script
.cgi .pl (httpd.conf)
se non e' nessuna delle precedenti fai un cat di errorlog e postalo (solo la
parte che interessa)

il redirect stampa la stringa Location etcc. nell'header che il server manda
al browser.
Essendo un header, è in cima  :-)
quindi prima non bisogna stampare nulla!!!
MAx

Sinceramente lo davo per scontato, comunque è vero, se nell'error_log
è presente una entry del tipo "malformed header from script"
si è commesso l'errore di chiamare la funzione CGI::redirect *dopo*
che l'header per la pagina è già stato (malamente) inviato.
Non è il caso cmq dello scriptino che ho postato per consentire il testing
della funzionalità del modulo.
Newsgroup: it.comp.lang.perl
Titolo: Versioni del Perl

Quasi mi vergogno a fare una domanda del genere, ma non sono riuscito a
trovare spiegazioni da nessuna parte. Perl "ActiveState" che versione di
Perl è? Io ho adesso la 5.004 trovata sull'ormai mitico manuale McGrawHill
"Perl e Internet". Ho la sensazione che mi sfugga qualcosa...
Inoltre: sarebbe possibile mantenerle entrambe sullo stesso pc? A quanto ho
capito entrerebbe in conflitto l'istruzione PATH nell'autoexec.
_dave_
ps- Ovviamente mi riferisco all'ambito win32.
pps- Scusate per la banalità delle domande, ma giuro che ho cercato risposte
altrove senza trovarle: non sarebbe ora di una faq per it.comp.lang.perl?

 nell'autoexec.
  E` *molto* probabile, anche se non definitivo. Dovresti vedere i
README per l'installazione.
	Alla prossima,
		Marco

altrove senza trovarle: non sarebbe ora di una faq per it.comp.lang.perl?
Ciao Dave,
se ho capito bene vuoi sapere quale è l'ultima versione disponibile di Perl
fo Win32.
Al momento la versione di ActiveState è la seguente  5.005_03 build 515 del
9/4/99
e la puoi trovare su 
http://www.activestate.com
 dove puoi verificare se ci
sono aggiornamenti
e dove lo puoi scaricare. (ho controllato oggi 6/5/99)
Può succedere che ActiveState pur non variando la versione aggiorni
solamente il  build .
Per quanto riguarda la convivenza non ho esperienza ma non dovrebbero
esserci problemi per i tuoi script
se usi la versione nuova. Prima di calcellare o disinstallare la vecchia
versione verifica che non ci siano
librerie o moduli  NON standard o aggiunti da A. Bellini e A. Guidi  gli
autori del libro.
Spero di avere chiarito i tuoi dubbi.
Saluti
Marco



Newsgroup: it.comp.lang.perl
Titolo: Debugger Perl

Esiste un debugger interattivo per il Perl?
Qualcosa tipo quei prodottini per C++ ecc.. sotto Winzozz...
Ciao

ChRiS <m€> wrote:
: Esiste un debugger interattivo per il Perl?
: Qualcosa tipo quei prodottini per C++ ecc.. sotto Winzozz...
perl -d nomefile
Per informazioni leggi perldebug (la pagina di manuale).
Sei usi *nix puoi provare anche una delle ultime versioni del ddd, che
fa da front end al debugger del Perl.
Per Windows so che ci sono dei debugger commerciali. Consultando la
pubblicita` sul TPJ vedo un ambiente integrato
(
www.solutionsoft.com/perl.htm
) e un Perl Debugger 1.1
(
www.activestate.com
)
-- 
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
Newsgroup: it.comp.lang.perl
Titolo: MTA con auth

Ciao a tutti,
devo modificare uno script perl che usa sendmail come MTA,
perch� devo aggiungere l'autenticazione smtp.
Lo script banalmente apre una pipe su sendmail e gli invia
gli header classici, (To, From, Subject, etc.), body della mail,
attachment e quant'altro. Cosa devo aggiungere a livello di sintassi 
degli header per abilitare l'autenticazione sul server?
So che ci sono gi� i moduli pronti, ma ho bisogno di farlo cos�.
Grazie
gi

, scriveva:

D'accordo, ma "farlo cos�" dubito che possa permettere l'autenticazione
SMTP, che si ottiene con un colloquio sulla porta SMTP (25) secondo il
rispettivo protocollo e non ha nulla a che vedere con la "sintassi degli
header" del messaggio.
"Aprire una pipe", mi pare che voglia dire, di per s�, saltare il
protocollo SMTP, e quindi in particolare la procedura di autenticazione.
Non conosco per� molto bene sendmail, e pu� anche darsi che la strada
invece ci sia (direi, eventualmente, attraverso delle opzioni per la pipe,
non comunque negli header del messaggio), o che abbia frainteso la
richiesta.
Ciao.


S� in effetti rileggendo il mio post non era molto chiaro quello che
volevo dire. Mi interessava sapere se esistono opzioni di sendmail,
quindi passate ad es. su linea di comando, che permettono di autenticare
sul server.
Per ci� che riguarda il saltare il protocollo SMTP, non � corretto.
Da qualche parte, nel mio caso il sendmail stesso, aprir� un telnet 
sulla porta 25 del relay e trasmetter� i dati necessari tramite
protocollo SMTP.
Grazie comunque per la dovuta precisazione.
Ciao,
gi
Newsgroup: it.comp.lang.perl
Titolo: Perl cgi-bin (protezione per Apache dipendente dai parametri)

Dear perl admins and programmers,
after writing some perl programs to be used as cgi-bin from on Apache Web
Server, we were asked to protect some URLs through Apache Authorization
depending on the QUERY_STRING value. Do you know whether it is possible
either through Apache configuration or Perl ?
Our problem arises from the fact that the <Location> directive of Apache
conf file only grabs the URL, not its parameters.
Any suggestions ?
(anche a comp.lang.perl.misc e comp.lang.perl.modules e it.comp.lang.perl)
Cari amministratori e programmatori perl,
dopo aver scritto programmi in perl da usare come cgi-bin per il Server Web
Apache, ci č stato chiesto di proteggere alcune Url, tramite i modelli di
Apache, sulla base del valore della variabile QUERY_STRING. Sapete se č
possibile tramite Apache o Perl stesso.
I nostri problemi derivano dal fatto che la direttiva <Location> di Apache
sembra sensibile sollo alla Url, non ai parametri passati.
Suggerimenti ?

 Suggerimenti ?
un po' OT, comunque dovresti poterlo fare con <LocationMatch>
http://httpd.apache.org/docs/mod/core.html#locationmatch
al limite dai un'occhiata a mod_rewrite e mod_access, se vuoi avere invece 
il massimo controllo installa mod_perl
-- 
/federico

Newsgroup: it.comp.lang.perl
Titolo: Validazione e recupero dati in Perl

Sto imparando il Perl, ma prima usavo Javascript
per la validazione dati. Mi sembra di capire che tutto
avviene lato server; non è un punto a sfavore questo
visto che si riduce notevolmente il traffico convalidando
i dati lato server?
Poi per la connessione a database e le query sui dati
io usavo 
ASP.NET
 e 
ADO.NET
 e mi ero trovato
abbastanza bene per la velocità di sviluppo.
Con Perl è relativamente più difficile fare query,
update, riempire tabelle di dati rispetto alle tecnologie citate
sopra?
Mi piacerebbe sapere quali vantaggi mi porta passare a Perl
per la programmazione Web rispetto alle tecnologie che usavo
prima.
Un grazie agli appassionati di questo linguaggio che mi risponderanno.
Ciao.
Davide.

 prima.
Perl è uno strumento potentissimo per quanto riguarda il web programming,
anche perché è stato uno dei primi linguaggi dedicati allo scopo. Al
giorno d'oggi, software come mod_perl ti permettono di sfruttarne
del tutto le grandi potenzialità.
Inoltre, cosa secondo me non da poco, non ti leghi ad un sistema operativo
oppure addirittura ad una software house per quanto riguarda l'ambiente
dove possono girare i tuoi programmi. Perl è open source, ed è
disponibile più o meno per tutti i sistemi operativi esistenti. Se i
programmi sono scritti bene, possono girare su uno o l'altro sistema
operativo senza bisogno di alcuna modifica.
Spero di averti fornito qualche indicazione utile. ;-)
A presto, Michele.
-- 
Michele Beltrame
http://www.italpro.net/mb/
ICQ# 76660101 - e-mail: 
m...@italpro.net
Newsgroup: it.comp.lang.perl
Titolo: uninitialized in eval

Ciao a tutti,
In una serie di script piuttosto complessi e con una peste di moduli
chiamati direttamente o da altri moduli mi compare questo warning:
Use of uninitialized value in hash element at (eval 45) line 10., referer:
http://127.0.0.1/cgi-bin/MyDB_oop/MyDB.pl
Il problema è:
Come individuare l'eval responsabile del warning?
Che vuol dire (eval 45)?
Suppongo invece che "line 10" si riferisca al codice interno all'eval.
Giusto?
Grazie.
-- 
-- Marco Allegretti --
http://www.shishii.com

 
http://127.0.0.1/cgi-bin/MyDB_oop/MyDB.pl
Che sia la riga 45 del codice eval-uato, e tale eval venga chiamato alla
riga 10 dello script MyDB.pl ?

Andrea Maestrutti ha scritto:

Purtroppo no.
ne alla riga 10 ne alla 45 vi sono eval. L'eval più vicino sta alla 74.

Newsgroup: it.comp.lang.perl
Titolo: Sistema operativo

Ciao,
volevo chiedervi se esiste una variabile particolare che contenga
il nome del sistema operativo.
Grazie...


  print $^O;
oppure:
  use English;
  print $OSNAME;
cheers,
Aldo
__END__
$_=q,just perl,,s, , another ,,s,$, hacker,,print;

 nome del sistema operativo.
   perldoc perlvar
       $OSNAME
       $^O     The name of the operating system under which this
               copy of Perl was built, as determined during the
               configuration process.  The value is identical to
               $Config{'osname'}.

Newsgroup: it.comp.lang.perl
Titolo: confronto stringhe

quale è il modo più facile per fare il confronto tra due stringhe ignorando
il case sensity?
M.

 ignorando il case sensity?
Spontaneo mi viene:
if (lc $str1 eq lc $str2)
{
    ...
}
Newsgroup: it.comp.lang.perl
Titolo: funzione su stringa

In Perl esiste una funzione che, dato un carattere separatore, scinde una
stringa in un array, come fa in PHP explode()? Anche senza una funzione
specifica qualcuno ha qualche suggerimento per ottenere lo stesso risultato
in altro modo?
Ciao e grazie.
Alberto

...


 ha scritto nel messaggio
news:96638b$rjg$1...@pegasus.tiscalinet.it...


ma flessibile e espandibile come PERL.
E' verissimo !!!
Purtroppo quasi tutti i server web pubblici accettano i cgi in perl
semplici, non installano alcun modulo, quindi ci si trova costretti (beh,
solo per comodita') ad usare PHP.
Sul server web personale invece ti installi tutto quello che vuoi e Perl e'
davvero imbattibile, visto che e' molto piu' potente dei rivali.
Il fatto e' che perl non nasce  per il web e quindi non viene fornito (in
versione standard) come php.
php mi piace abbastanza, certo e' meglio di asp specialmente se si utilizza
VBscript che francamente mi e' gia' un miracolo che non abbia ancora i
numeri di riga etichetta !!! :-)
Alex
P.S. W il Perl

Scusate, Visto che siamo in tema anche se ot, come faccio ad installare PHP sul
mio server personale Apache ( Win NT ) ?
Io ho scaricato PHP4 e lo ho installato, il problema è che non riesco a
configurare il server ( http.conf )...
Qualche consiglio ?
Sono curioso si sapere come funziona il php così anch'io potrò confrontarlo con
Perl se no
mi resta la curiosità ...
grazie


...


FUNZIONA!!!!
Grazie 1K anzi 1M anzi 1G anzi 1T
Grazie alle tue indicazioni ho scoperto di avere installato la versione di PHP
errata...
Oops :-(
Adesso ho scaricato la versione che ha i file e le dir che Tu hai citato e "et
voilà"
Les jeux son't fait o qualcosa del genere...
Ho fatto una prova e funziona!!!
Sono felice oggi è un buon Lunedì
Ancora grazie
Alex wrote:

--
---
Gioachino Bisconti
Magneti Marelli S.p.A.- Electronics Division  - I&SP
Web Master - I&SP
Viale Carlo Emanuele II 118
10078 Venaria Reale (Torino)
Tel. +39-011-68.79.134
Fax. 
+39-011-6879
.126
mailto:
Gioachino...@venaria.marelli.it
http://www.venaria.marelli.it/dse/isp/mdp/index.htm

 wrote in message
3A9A1746...@venaria.marelli.it...

Newsgroup: it.comp.lang.perl
Titolo: Sistema e altro

Ciao:)
Cosa posso sapere sulla macchina (linux) dove mi trovo ?
Es. cpu ram ecc...
Ma anche variabili di sistema, insomma tutto quello che posso sapere
*senza installare moduli*
Grazie.

  >>>>> "O" == Oxy  <fjh...@fjdjf.gjhg> writes:
  O> Ciao:) Cosa posso sapere sulla macchina (linux) dove mi trovo ?
  O> Es. cpu ram ecc...  Ma anche variabili di sistema, insomma tutto
  O> quello che posso sapere *senza installare moduli* Grazie.
Puoi accedere a /proc, per maggiori informazioni, potresti chiedere su
it.comp.os.linux.development, anche se trovare documentazione non è
per nulla difficile.
Ciao,
nico

"Domenico Delle Side" <nic...@Tiscali.IT> ha scritto nel messaggio
news:87fze6o...@deepcool.it...

purtroppo di linux non ne so nulla   "/proc" non ho idea di cosa sia.
Ma forse non mi sono spiegato intendevo come avere i dati con un cgi Perl.
Pero' forse si puo' usare un System ("....") !?
Ciao.

~\/~ "Oxy" == Oxy  <fjh...@fjdjf.gjhg> writes:
   > "Domenico Delle Side" <nic...@Tiscali.IT> ha scritto nel
   > messaggio news:87fze6o...@deepcool.it...
     > >>>>> "O" == Oxy <fjh...@fjdjf.gjhg> writes:
Oxy> > O> Ciao:) Cosa posso sapere sulla macchina (linux) dove mi trovo ?
Oxy> > O> Es. cpu ram ecc...  Ma anche variabili di sistema, insomma
Oxy> > O> tutto quello che posso sapere *senza installare moduli* Grazie.
     > Puoi accedere a /proc, per maggiori informazioni, potresti
     > chiedere su it.comp.os.linux.development, anche se trovare
     > documentazione non è per nulla difficile.
Oxy> purtroppo
Oxy> di linux non ne so nulla
Oxy> "/proc" non ho idea di cosa sia.
fattela.
Oxy> Ma forse non mi sono spiegato
No, e` assolutamente certo che non ti sei spiegato, e forse mai ti spiegherai.
Oxy> intendevo come avere i dati con un cgi Perl.
A gente metodicamente ignorante "i dati" non sono concessi.
Oxy> Pero' forse si puo' usare un System ("....") !?  Ciao.
Si puo`, nulla e` vietato, usalo e` proprio quello che ti hanno detto...
Ma ti consiglierei di imparare cosa e` un CGI, prima di trasformare
la frase "sapere ... dove mi trovo" in "con un cgi perl". (una volta
che lo sai non c'e` bisogno del CGI perl per fartelo risapere).
Saluti.