mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: Devo aprire un URL contenete "@"....

Devo aprire un URL contenete "@":
$pagina[0]="XXX.com/q?s=@_XX=t";
Ma non si compila su win98!
In string, @_XX now must be written as \@_XX at 
PROVA.PL
 line 20, nea.......
BEGIN not safe after errors--compilation aborted at 
PROVA.PL
 line 41.
Come potrei fare?
Su UNIX potrebbe andare o non cambia nulla?
Grazie.
F.

 ha scritto nel messaggio
news:8eqf63$dlg$1...@news.IT.net...


In string, @_XX now must be written as \@_XX at 
PROVA.PL
 line 20, nea.......
in una stringa di testo, @_XX deve essere ora scritto
come \@_XX in 
PROVA.PL
 linea 20, vic.......
Oha
-- 
#include <disclaimer.h>

 Su UNIX potrebbe andare o non cambia nulla?
Nada!
Ciao

> In string, @_XX now must be written as \@_XX at 
PROVA.PL
 line 20, nea.......
ehm... direi che la cosa è risolta, no? t'ha detto che @ è un carattere speciale
e bisogna mettergli davanti un carattere di escape, no?

 wrote in message
8fbgad$do5$2...@pegasus.tiscalinet.it...


Newsgroup: it.comp.lang.perl
Titolo: [CGI] visualizzare mentre carico

Ciao a tutti, sto scrivendo qualche cosa in perl per applicazioni CGI.
Il problema piu' grande che ho e' che la pagina mi si visualizza solo
alla fine di tutta la elaborazione dello script, mentre io vorrei che
almeno qualche tabella (o almeno una scritta "Aspetta un secondo...")
fosse visualizzata durante la elaborazione...
Qualche idea su come fare?
$| = 1 credevo fosse la soluzione, ma evidentemente non e' sufficiente.
d 
-- 
Davide Cittaro
Drop WINDOWS if you want to reply

 Qualche idea su come fare?
Avevo anch'io lo stesso problema e ho risolto mandando l'output al browser
(con print) in forma di Content-Type: text/plain volta per volta.
Non so se e' una soluzione valida per tutte le piattaforme/browser/server,
comunque puoi provare ...
Male che vada almeno hai un feedback testuale, e alla fine dell'esecuzione
puoi fare il refresh della pagina in HTML.
  Raffaello

   Raffaello
Mmm, non e' una soluzione che mi convince molto, anche perche' ho
provato uno script e non mi funziona comunque... 


 fosse visualizzata durante la elaborazione...
Devi restituire l'header "Transfer-Encoding: chunked" senza specificare
l'header Content-Length, dopodiche' restituirai i tuoi pezzi uno per uno.
Per le specifiche vedi RFC2616:
http://www.w3.org/Protocols/rfc2616/rfc2616-sec3.html#sec3.6.1
Sicuramente in CPAN c'e' qualcosa che ti aiuta, ma se non devi fare 
niente di compilcato una volta che hai capito come funziona devi solo
mettere insieme 5-10 righe di codice.
  - Alessandro Ranellucci

Newsgroup: it.comp.lang.perl
Titolo: ncurses e dialog

salve a tutti, qualcuno ha mai provato ad usare le suddette librerie con
un programma perl? il modulo che c'e' su cpan non si compila neanche a
morire, qualcuno ha trovato qualcosa di meglio? dico questo perche' sono
sicuro di aver visto qualcosa in giro, ma ho perso l' url
ivan


whiptail č il *cugino fico* di dialog ;-) ma di piů non so...
Ciao
-- 
Wiz of Id a.k.a. William Ghelfi
E-Mail: < mailto:
w...@galactica.it
 >
Web Site: < 
http://web.tiscalinet.it/penguin_rules/
 >
Newsgroup: it.comp.lang.perl
Titolo: Problema con Perl

Ciao a tutti, scusate l'intromissione ma ho da poco iniziato a fare un
lavoro dove ho bisogno di scrivere dei piccoli script in Perl, ma le
mie conoscenze in materia sono scarissime e ora mi trovo alle perse...
Praticamente ho un file organizzato in righe e colonne. Alcuni campi
contengono lettere, altri lettere e numeri, altri solo numeri. Quello
che dovrei fare è:
- duplicare ogni riga. Inizialmente ho 10 righe: nel nuovo file dovrò
invece averne 20, perchè ogni riga è stata sdoppiata. Per distinguere
le due righe "gemelle", bisogna che, nel campo che si trova nella
quarta colonna, una venga marcata con la sigla "ACC" e l'altra con la
sigla "DON".
- le colonne 2 e 3 hanno solo valori numerici. La colonna 6, invece,
può avere un + o un - Chiamando X il numero nella colonna 2 e Y il
numero nella colonna 3, devo ritrovarmi ad avere la seguente
situazione:
CASO IN CUI NELLA COLONNA 6 CI SIA UN -
per le righe "DON": X-50 nella colonna 2, X nella colonna 3
per le righe "ACC": Y nella colonna 2, Y+50 nella colonna 3
CASO IN CUI NELLA COLONNA 6 CI SIA UN +
per le righe "ACC": X-50 nella colonna 2, X nella colonna 3
per le righe "DON": Y nella colonna 2, Y+50 nella colonna 3
Qualche idea su come potrei procedere? Considerate che sono molto
ignorante...

 mie conoscenze in materia sono scarissime e ora mi trovo alle perse...
Prova inizialmente a scrivere il tutto in maniera più algoritmica,
anche se non è sintassi Perl non fa niente. Tipo:
per ogni riga in ingresso
   se pippo
      allora pluto
   stampa una volta
   modifica quello che devi modificare
   stampa un'altra volta
   ...
Poi magari ti si può aiutare a "tradurre" il tutto in Perl. Se vuoi
cominciare:
my $separatore = ','; # metti il tuo separatore
while (<>) { # legge tutte le righe in ingresso
   chomp;     # elimina il carattere newline alla fine
   my @campi = split /$separatore/;
   # qui il resto
   $campi[3] = 'ACC'; # il campo 4 ha indice 3
   print join($separatore, @campi), "\n";
   $campi[3] = 'DON';
   print join($separatore, @campi), "\n";
}
Ciao,
   Flavio.
Newsgroup: it.comp.lang.perl
Titolo: perl e html

Ciao a tutti
domanda:
io ho una versione statica di un sito fatto in html, con form di
registrazione utenti ecc ecc.
Ora voglio fare gli script in perl appongiandomi ad un database
postgresql.
Se il form in html presentano imprecisioni a livello di codice html
quando andrò a crearmi lo script in perl mi può dare problemi a
livello di visualizzazione?
Grazie...

Purtroppo come descrizione mi sembra un po' vaga, vediamo se una
risposta altrettanto vaga può andare bene però :)
Se ho capito bene, stai utilizzando delle pagine HTML come "modelli"
per la parte di visualizzazione. Immagino che queste pagine andranno
riempite con determinate informazioni in maniera dinamica: lo script
perl carica queste informazioni dal database e le infila nelle pagine.
Per una cosa del genere puoi dare un'occhiata ai vari sistemi di
templating disponibili, fra cui Template Toolkit e HTML::Template (li
trovi su CPAN, ovviamente).
Per quanto riguarda le imprecisioni, la risposta in generale è "si",
ma anche nel caso che tu non abbia imprecisioni nel documento HTML! Se
utilizzi perl per "infilare" dati nella tua pagina modello, devi
ovviamente stare attento a non stravolgere la struttura del documento.
Per il resto, direi che le imprecisioni hanno impatto di per loro,
indipendentemente da perl.
Per concludere, se vuoi un sistema integrato che ti consenta di
adottare l'approccio Model-View-Controller puoi dare un'occhiata a
Catalyst (sempre su CPAN) - ci sono persone che leggono qui in ng che
lo utilizzano in maniera proficua.
Ciao,
   Flavio.

Grazie per la risposta,
però continuo a ricevere informazioni diverse
Mi è stato detto anche che il perl crea l'html
e che quindi il template non conta molto.
Mi puoi essere d'aiuto?
Grazie
Falcon

 e che quindi il template non conta molto.
http://perl.apache.org/docs/tutorials/tmpl/comparison/comparison.html
http://search.cpan.org/~abw/Template-Toolkit-2.14/
http://search.cpan.org/~mjd/Text-Template-1.44/
http://search.cpan.org/~samtregar/HTML-Template-2.8/
http://search.cpan.org/~jmoore/CGI-FastTemplate-1.09/
http://search.cpan.org/~bpostle/Petal-2.18/
http://search.cpan.org/~drolsky/HTML-Mason-1.32/
http://www.masonhq.com/
http://search.cpan.org/~grichter/Embperl-2.1.0/
http://search.cpan.org/search?m=module&q=Template&s=1&n=100

Newsgroup: it.comp.lang.perl
Titolo: PORNO SCIOCCANTE

http://euronet.globalredirect.com
4
G5VE
FGVFGV5
V54
3F34
2342D3244F54
3FV6344
FQ
5F3F35
R
EG
4354
F
34

http://euro-net.da.ru
45EF
65H
YRE
H
FGH
FD
YNUTF
G
675E
6754
56G4
T5
3T
6E5
H65E7YH5E
6RY
HBR
BTYB
Newsgroup: it.comp.lang.perl
Titolo: AIUTO !!! Pattern Matching

Son giorni che sto cercando di convertire la segente stringa :
OL.MI;2,425;28/05/01;13.50;-0,003;2,44;2,465;2,41;8005750
in
"OL.MI",2.425,"28/05/01",13:50,-0.003,2.44,2.465,2.41,8005750
Grazie anticipatamente.
Simon


Prova questo:
$stringa=~s/^(\w+\.\w+)/"$1"/;         # mette tra virgolette il primo
campo
$stringa=~s/(\d\d\/\d\d\/\d\d)/"$1"/;  # mette tra virgolette tutto ciò
che sembra una data
$stringa=~s/\./:/g;                    # cambia . in :      
$stringa=~s/,/\./g;                    # cambia , in .   
$stringa=~s/;/,/g;                     # cambia ; in ,
E' un po' raffazzonato, però mi pare che funzioni.
Gabriele

 ha scritto nel messaggio
news:0whv7.4228$DW5....@news2.tin.it...

basta che fai un split in corrispondenza del ; e metti gli elementi in un
array, intervieni poi singolarmente su ogni elemento dell'array

Gabriele

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

Salve a tutti,
                    girando per la rete mi sono imbattuto in un sito
www.debauer.de/
   dove nella home page, viene richiamato un contatore di
visite che presenta un effetto strano molto bello. premetto che di perl sň
poco e niente, volevo chiedervi se codesto contatore č stato realizzato in
perl, e se veramente č stato realizzato il tal modo come fare a
riprodurlo.....
grazie in anticipo
NRE

 perl, e se veramente è stato realizzato il tal modo come fare a


il flash può leggere variabili da un file di testo...
basta che un cgi qualsiasi conti e metta il numero uin un file=))
ciaociao
Newsgroup: it.comp.lang.perl
Titolo: Si deve usare un espressione regolare?

Ho una varibile formata da una sequenza alternata di un carattere e un
numero(anche a più cifre), e una seconda varibile formata da un solo
carattere, vorrei fare in modo che se il carattere della seconda variabile
fosse presente nella prima varibile venisse fornito il numero che lo segue.
es.
$var1="a3b14c8e243"
$var2="b"
vorrei che venisse trovato il carattere "b" nella $var1 e fosse ritornato il
numero che lo segue, cioè in questo caso "14";
se fosse stato:
 $var2="e" dovrebbe essere ritornato il numero "243".
Salve e grazie.

 
  $var1 =~ /$var2(\d+)/;
  $num = $1;	

 wrote in message
news:9nd5a0$k5a$1...@nreadb.inwind.it...

Puoi creare una tabella hash, come nel codice che segue.
HTH
$re = qr/(a)(\d+)(b)(\d+)(c)(\d+)(e)(\d+)/;
$var1="a3b14c8e243";
$var1 =~ $re;
%num = ($1=>$2,$3=>$4,$5=>$6,$7=>$8);
while (1)   {
   print STDERR "Inserisci una lettera [abce] ";
   print STDERR "(solo INVIO per terminare): ";
   chomp($var2=<STDIN>);
   last if ($var2 eq '');
   if ( $num{$var2} )   {  print "$var2 \= $num{$var2}\n";  }
   else  {   print "$var2 \= NON definito\n"; }
   }
exit;

Se sai che si possono usare le espressioni regolari perchč non ci
provi?
Ph.

 Ph.
Se fossi stato capace ad usare una espressione regolare per questo caso, non
lo avrei chiesto nel news :-P

Newsgroup: it.comp.lang.perl
Titolo: Dov'è scomparso http://www.perl-it.org ?

Sono nuovo di questa NG, ciao a tutti
    finito di leggere tutti i 130 e + messaggi, ho provato a collegarmi col
sito 
http://www.perl-it.org
 ma non riesco a vederlo, problema del mio
browser o server dns , bo ?
Grazie infinite per eventuali risposte
Tony

browser o server dns , bo ?
Io riesco ad accedere, forse era down temporaneamente. Comunque sia,
benvenuto tra noi!
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
==> 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: aiuto!!!! sto impazzendo.....

C'è un'anima pia che può spiegarmi come accidenti si fa ad aprire ( perl
for win32 ) un file html e storarlo in un array per poi elaborarlo ?
Why ? Pecchè ? questa porzione di codice :
open (HTMLDOC, "$nomefile");
@lines = <HTMLDOC>;
close (HTMLDOC);
$lunghezzarray = @lines;
for ($a = 0; $a <= &lunghezzarray; $a++) {
	$_ = $lines[$a];
	print "$_\n";
}
non mi stampa un benedetto c..... ?
Il santo che mi risponderà oltre a guadagnarsi un posto in paradiso si
guadagnerà un posto nei miei pensieri...
...il succo sarebbe " a buon rendere ".
GRAZIE ! ! !

 non mi stampa un benedetto c..... ?
Due errori. Al lettore lasciamo il compito di confrontare e capire. :)
open (HTMLDOC, "$nomefile");
@lines = <HTMLDOC>;
close (HTMLDOC);
$lunghezzarray = $#lines;
for ($a = 0; $a <= $lunghezzarray; $a++) {
	$_ = $lines[$a];
        print "$_";
}
	risoltamente,
	   Cthulhu                
-- 
       Ph'nglui mglw'nafh Cthulhu 
http://www.rlyeh.it
 wgah'nagl fhtgan!

Newsgroup: it.comp.lang.perl
Titolo: info per carrello spesa

ciao a tutti...
ho realizzato un carrello della spesa in JS e lo vorrei convertire in
Perl...qualcuno mi puo' eventualemente aiutare?
Ho letto che Perl lavora sotto unix, ma sotto win?
Grazie ciao
Emanuele

Ho letto che Perl lavora sotto unix, ma sotto win?
Non mi e` ben chiaro come potresti convertire un codice JS in Perl, visto
che normalmente uno e` client-side e l'altro server side. ;-) Se comunque
il tuo scopo e` implementare una shopping bag in Perl, puoi farlo anche
sotto Windoze. Visita:
http://www.activestate.com
	A presto, 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!

Grazie vado a vedere
PS. per convertire intendo tradurre..cioe' riportare quello che e' stato
progettato per JS in perl con le dovute modifiche :-)
Ciao Michele
Emanuele
Newsgroup: it.comp.lang.perl
Titolo: valuta & cambi

Ciao,
c'e' qualcuno che conosce delle fonti accessibili via CGI di valori delle
valute internazionali?
Mi spiego, ho delle pagine descrittive di prodotti generate da CGI (Perl)
che si collegano a un db, mi piacerebbe che, oltre a visualizzare il prezzo
in lire italiane (che e' un campo della tabella prodotti) mi venisse
visualizzato il piu' fedelmente possibile il costo chesso' in dollari e in
euro.
In definitiva quello che cerco e' una URL che mi ritorni il cambio attuale
Lira verso le altre valute.
grazie
--
Mario

 fedelmente possibile il costo chesso' in dollari e in euro.
  Il tasso di cambio dell'Euro contro Lira e` fisso, ed e` circa 1936
(non ricordo i decimali).
	Alla prossima,
		Marco

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

 Mario
-- 
ASTAT - Istituto provinciale di statistica
viale Duca D'Aosta, 59
I - 39100 Bolzano
tel: 0471/994045  fax: 0471/994008
http://www.provinz.bz.it/astat

 euro.
Se vai su 
perl.com
 e per la precisione a
http://www.perl.com/reference/query.cgi?finance
, puoi trovare 3 moduli
scritti per accedere alle 'quotes' di yahoo. Io ho usato Finance:YahooQuotes
per crearmi una mia pagina con le mie azioni, ma so che potrebbe in qualche
modo essere usata per prendere il valore della moneta.
Se vai su Yahoo e cerchi il valore di una azione, viene utilizzato uno
script a cui viene passato almeno un parametro, ossia il nome dell'azione.
Nel caso di yahoo, ad esempio sarebbe YHOO e l'indirizzo e'
http://quote.yahoo.com/q?s=YHOO
Ora se al posto di YHOO metti ^XEU, ecco che hai il valore dell'euro.
    Best regards,
        Kazuma
--
Alex Garbagnati, 
agarb...@removethis.messagemedia.com
manager, Database Development
MessageMedia
Mountain View, CA  94043

euro.
Per gli EURO non hai problemi ovviamente. ;-) Per le altre valute, io
faccio il parsing delle pagine di 
it.finance.yahoo.com
.
	Michele. 
-- 
Michele Beltrame
mi...@io.com
http://www.io.com/~mick/
Newsgroup: it.comp.lang.perl
Titolo: problema allucinante

per me questo problema è oltre che illogico di ardua soluzione (per le
mie poche conoscenze):
ricavo da un file di testo attraverso l'espresione regolare:
/size=(.*?),/; 
un numero.
Questo numero devo moltiplicarlo per due e a questo punto mi accorgo che
a volte l'operazione non è esatta.
 Stampando il numero ricavato mi accorgo che se la cifra finale è 1
viene stampata a schermo come una l  e quando moltiplico semplicemente
non viene considerata.
Per tutte le altre cifra la cosa funziona.
Qualcuno puo' illuminarmi?
Grazie 
Franco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Qualcuno puo' illuminarmi?
Potresti postare il frammento di codice in questione? Magari
qualche linea in più.
-- 
$_=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

non viene considerata.
La prima cosa che mi viene da pensare è un errore nei dati: che in quel
punto, nel testo, ci sia di fatto un l e non un 1. Perl è soggetto, come
qualunque linguaggio, ad errori di arrotondamento nei calcoli, e qualche
baco nelle librerie matematiche è pur sempre possibile, ma un comportamento
così non l'ho mai visto, né ne ho mai avuto notizia.
Mi associo, per il resto, alla richiesta di maggiori informazioni: esempio
minimale di codice e dati che riproducono il problema.
Ciao.

Newsgroup: it.comp.lang.perl
Titolo: Redirezione ad un'altra pagina

Qual è il comando in perl per redirezionare l'utente verso un'altra
pagina?
Grazie molte.
Please, remove 
NOSPAM.XYZ
 at the end of the address to reply

kurotsuke wrote:

print $query->redirect('
http://vaialsito
');
***************************************
messaggio inviato tramite HostSearch.it
---------------------------------------
---> 
http://www.hostsearch.it/newsgroup
***************************************
Newsgroup: it.comp.lang.perl
Titolo: Perl e pagine web!



Ciao a tutti, sono nuovo di perl e volevo dei chiarimenti.


Io vorrei realizzare una pagina web (server apache
su linux Mandrake),


che in base alle scelte mi attivi degli script
perl.


Siccome sto imparando dall'inizio ho seguito una
di quei corsi in


giro per internet e il primo script che mi propongono
è il seguente:


#!/usr/bin/perl


print "Hello world\n"; # Questo è un commento
e verrà ignorato; verrà


# eseguito solo il comando "print"


E' possibile che lo script di test lo faccia e
da web no?


E poi se io lancio lo script nel seguente modo
/usr/bin/perl 
prova.pl


lo script fa il suo dovere con dovizia e competenza
ma se lancio un


browser e punto a: 
http://localdomain/.../prova.pl

non funziona nel senso


che la pagina risulta vuota.


Cosa sbaglio? C'e' qualcosa che non faccio? Non
è che il perl interagisce con il


CGI? potete indicarmi un manualetto possibilmente
in italiano?


Grazie infinite per la pazienza e il tempo che
mi dedicate.


NK



 lo script fa il suo dovere con dovizia e competenza
Certo perchè così lo STDOUT è la shell
Se non dovesse ancora funzionare devi settare l'eseguibilità degli
script perl nel file di configurazione di apache che di default dovrebbe
essere nomedominio/cgi-bin
Ciao
-- 
Posted from 
relay.mailgate.org
 [151.38.159.199] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.perl
Titolo: installare modulo DBI sotto windows

Salve a tutti,
Stò cercando di installare questo modulo DBI per interfacciare il perl a
MySql. Per installarlo ho trovato su questo sito alcune info:
http://www.wdvl.com/Authoring/Languages/Perl/PerlfortheWeb/module.html
per installarlo mi dice di fare:
PPM interactive shell (1.0.0) - type 'help' for available commands.
	PPM>install DBI
	Install package 'DBI?' (y/N): y
	Retrieving package 'DBI'...
In effetti si installa ma dai log di apache appare questo:
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2] Premature end of
script headers: c:/programmi/easyphp/cgi-bin/prova.cgi
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2]
install_driver(mysql) failed: Can't locate DBD/
mysql.pm
 in @INC (@INC
contains: C:/Programmi/Perl/lib C:/Programmi/Perl/site/lib .) at (eval 1)
line 3.
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2] Perhaps the
DBD::mysql perl module hasn't been fully installed,
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2] or perhaps the
capitalisation of 'mysql' isn't right.
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2] Available drivers:
ExampleP, Proxy.
[Sun Feb 16 16:43:16 2003] [error] [client 192.168.1.2]  at
c:\PROGRA~1\easyphp\cgi-bin\prova.cgi line 8
avete qualche idea a tal proposito ?

 PPM interactive shell (1.0.0) - type 'help' for available commands.
1.0.0 ?
Ma che build di ActiveState Perl hai installato scusa?
Lo sai facendo da prompt di DOS:
perl -v
Cmq se hai una versione che inzia per 6 (633 ad esempio), puoi 
scaricarti il DBD-mysql da qui:
http://ppm.activestate.com/PPMPackages/zips/6xx-builds-only/DBD-Mysql.zip
lo scompatti in una dir, ci entri e da prompt di dos fai:
ppm install --location=. dbd-mysql
Se invece hai una versione che iniza per 8 (805 ad es), devi installarti 
la versione PP (Pure Perl) del modulo, da prompt di dos scrivi:
ppm install DBD-MysqlPP


http://ppm.activestate.com/PPMPackages/zips/6xx-builds-only/DBD-Mysql.zip
Ha funzionato facendo PPM install (il contenuto dello zip)
Grazie mille !

Newsgroup: it.comp.lang.perl
Titolo: Come ottenere un numero random intero?

Ciao a tutti... ho un problemino
non riesco ad ottenere un numero random intero... una volta
l'avevo fatto ma non ricordo come ed ora non ritrovo il sorgente
$var1 = rand(20);
uso la funzione rand in questo modo... dov'e' l'errore?
ho provato a fare
$var1 = rand(20); int $var1;
ma sembra non funzionare :(
help!
ciau,
Gilberto *Veleno* Ficara
___________________________
e-mail: 
g.fi...@fastnet.it
ICQ UIN: 11891959
http://veleno.cjb.net
___________________________
Webmaster di 
www.bestiario.com
 e 
www.hyleg.it
Designer di 
www.icq99.net
Ideatore e mantainer di 
www.3dinfinity.net
Membro dello staff di 
bbk.org
 (designer)
Collaboratore di Html Point, Netnews e 3dRevolution





prova con 
$var=int(rand(20));



 l'avevo fatto ma non ricordo come ed ora non ritrovo il sorgente
print int(rand(20)), "\n";
Ciao
-- 
echo f 0:0 ffff 0 | debug
La leggerezza del VOLER essere ....

 prova con $var=int(rand(20));
grazie a tutti ora funzia perfettamente :)))
(ma quanto so' lamah :( )

Newsgroup: it.comp.lang.perl
Titolo: Mostrare un file di testo

Come si fa a mostrare un file di testo a schermo tramite uno script
perl?
Grazie.


open FILE, "file.txt" or die "Non posso apire file.txt: $!\n";
while (<FILE>) {print}
close FILE;
-- 
$_=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: file e dir

Ciao.
Dopo aver alquanto googlato e perldoccato, non riesco a venire a capo del
seguente problema: listare il contenuto di una dir, in primis[1], e operare
una certa azione su ogni file della dir in questione, in secundis[2]. So che
è una cosa banale, ma...
[1]Questo script non va - c'ho provato! :-))
use warnings;
use strict;
my $dir=$ARGV[0];
opendir (IN, "$dir");
print my @dir = readdir(IN);
close IN;
exit;
più che altro non risco a passagli il percorso della dir: tutto, a partire
da C:\, G:\  o chi per esso? e se lo script deve "girare" nella dir che mi
interessa?
[2] non mi preoccupo più di tanto, sara questione di foreach...
Ajoto!
stefano


File:Find fa al caso tuo.
perldoc File::Find
   - Enrico
--------------------------------
Inviato via 
http://usenet.libero.it

 perldoc File::Find
Grazie! č OK per la questione [1], un po' meno per la [2]. Mi spiego; come
faccio a dirgli di aprile ogni file?
facendo cosě :
sub wanted {
 open(IN, "$File::Find::dir");
 @filedata = <IN>;
 close IN;
etc...
}
non va! mi restituisce sempre : readline() on closed filehandle IN ...
ciao
stefano

Ritiro la precende. Funziona. Mancava un pezzo.
open(IN, "$File::Find::name");
 @filedata = <IN>;
 close IN
ciao!

e se lo script deve "girare" nella dir che mi interessa?
Puoi usare . per indicare la directory da cui lanci il programma.
Ciao.

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

come faccio a connettermi al un db2 su NT con uno script perl che gira
sotto unix?
e' possibile??
qualcuno ha un esempio concreto?
Vi ringrazio.
Marco

 qualcuno ha un esempio concreto?
Puo' essere complicato. Se non hai le librerie unix DB2 per usare 
DBD::DB2 (o chi per lui), temo tu debba ricorrere a DBD::ODBC, e l'ultima
volta che ho guardato l'unica implementazione dell' ODBC-ODBC Bridge (ovvero
librerie unix per collegarsi ad un server ODBC) era a pagamento.
Una volta che hai DBI+DBD funzionante, l'accesso diventa quasi banale 
(ovvero ti bastano gli esempi del manuale di DBI)
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: Istruzione per leggere un record in un file

Per chiunque possa darmi una mano.
Voglio realizzare un file ASCII che contenga un solo numero.
Ho capito come funziona l'istruzione OPEN e CLOSE, ma non so come fare per
leggere dal file un semplice numero (esiste un'istruzione READ?).
Grazie anticipatamente a tutti coloro mi aiuteranno.

 ha scritto nel messaggio
news:qorx5.41098$XZ4.5...@news.infostrada.it...

Newsgroup: it.comp.lang.perl
Titolo: Sort array con più campi

Scusate se scoccio, probabilmente l'hanno chiesto altri, ma non riesco ad 
ordinare un arrey bidimensionale tipo $tabella[$i][$j]
Se ho riempito l'array come faccio a desidere di ordinarlo per il primo o il 
secondo campo? 




---------------------
Leggi la documentazione della funzione sort, e le faq relative.
Ciao.

 contetuno.
Se vuoi ordinare sulla prima colonna (prezzo?) posto che sia sempre 
numerica:
my @tabella_ordinata = sort { $a->[0] <=> $b->[0] } @tabella;
Per verificare:
foreach my $record ( @tabella_ordinata ) {
     print "$record->[0] $record->[1]\n"
}
che infatti produce:
1 e
2 c
3 a
Se invece volessi ordinare sulla seconda colonna (prodotto?):
my @tabella_ordinata = sort { $a->[1] cmp $b->[1] } @tabella;
3 a
2 c
1 e
http://perldoc.perl.org/functions/sort.html
http://pod2it.sourceforge.net/pods/perlfunc.html
P.S.
Comunque per questi scopi sarebbe meglio usare un array di hashref, che 
è più espressivo di un array multidimensionale (array di arrayref).
Ciao,
Emanuele.

Newsgroup: it.comp.lang.perl
Titolo: Ancora sul passaggio di parametri

Salve, sono un'ultra principiante. Volevo sapere come si fa a passare i
parametri ad una cgi tramite un link. Con l'input lo so fare (method POST e
read nella cgi). Ma con i link?
Vorrei fare qualcosa tipo cgi-bin/x.cgi?qualcosa=qualcos'altro, ma non mi
riesce.
Grazie per la pazienza.
_dave_



ho risposto piu' volte su it.comp.www.cgi

 wrote:
: Salve, sono un'ultra principiante. Volevo sapere come si fa a passare i
: parametri ad una cgi tramite un link. Con l'input lo so fare (method POST e
: read nella cgi). Ma con i link?
: Vorrei fare qualcosa tipo cgi-bin/x.cgi?qualcosa=qualcos'altro, ma non mi
: riesce.
Scusa, ma non sono sicuro di aver capito cosa ti serve.
Vuoi che un CGI possa leggere parametri passati nell'URL?
Dato che posti in questo newsgroup immagino che il CGI sia scritto in
Perl, quindi ti consiglio di usare un modulo specifico, "CGI", compreso
nella distribuzione base del Perl, o gli analoghi object oriented
CGI-modules.
Per problemi di questo tipo comunque ti conviene usare il newsgroup
it.comp.www.cgi, in cui avresti una audience piu` vasta.
-- 
Nando Santagata: Telemastica & infornatica
Key fingerprint = C2 D9 C0 8E D5 B7 04 97  AF E8 3F 3E AF 4E 7F 9E
finger nando (at) ns (dot) ipers (dot) net   for my PGP public key
Home: 
http://www.ipers.net/~nandos

ho risposto piu' volte su it.comp.www.cgi
Hai ragione, scusa: ho sbagliato newsgroup. Comunque non ho trovato delle
FAQ di it.comp.www.cgi, quindi non so comunque come risolvere il mio
problema.
_dave_

...

Ciao _dave_ molto semplice...... lo puoi fare nel seguente modo:
devi avere un link da cui partire e poi:
 
http://www.mioweb.ch/prova.pl?CIAO=$ciao&CASA=$casa
dopo di che devi catturare il parametro tramite il protocollo GET nel file
proca.pl.....
                Se hai problemi mandami pure un mail... ti madero' un
esempio completo.....
            Ciao Mully
Newsgroup: it.comp.lang.perl
Titolo: distribuire script

ciao a tutti, ho scritto uno script per calcolare i miei turni di lavoro.
vorrei distribuirlo sia su win che su linux (ai miei colleghi servirebbe),
e mi e' stato consigliato par. in effetti leggendo la documentazione
sembra fare proprio quello che mi serve, ma se devo essere sincero non mi
sembra di aver capito come usarlo, quindi chiedo aiuto :). qualcuno di voi
ha idea se esista un howto sull'uso di par, oppure qualche anima pia butta
giu' una scaletta di passaggi per l'uso? se puo' essere utile lo script in
questione usa perl Tk e Data::Simple, oltre al perl ovviamente ;).
fatemi sapere se e' il caso di postare lo script per intero.
ciao e grazie
alek

 ...
Guarda... se non sono male informato, PAR serve per rendere eseguibili
dei programmi in perl. O almeno, io l'ho utilizzato proprio per questo
:-)
Oltre, ovviamente, ad aver installato il modulo, puoi seguire questo
breve manualetto facile da leggere:
http://search.cpan.org/~autrijus/PAR-0.86/lib/PAR.pm
Le prime righe di codice ti danno immediatamente l'idea di come si
utilizza ma... siccome mi turba chi dice semplicemente "guardati la
documentazione" :-) in poche parole puoi scrivere, da linea di comando,
una delle seguenti istruzioni:
    % pp -o packed.exe 
source.pl
        # generate packed.exe
    % perl -MPAR=packed.exe 
other.pl
    # this also works
    % perl -MPAR -Ipacked.exe 
other.pl
  # ditto
-- 
nathanvi
ICQ --> 20318568
mail --> vitto.z A_T 
tiscali.it
sito --> 
http://www.centrostudiraffaello.it/sito/

 dei programmi in perl.
No, anche per creare cose simili ai Jar in Java: crei uno zip con
estensione .par, poi lo esegui con parl.exe o 
par.pl
 tanto da altri .pl
come da linea di comando, trovi tutto nel tutorial:
http://search.cpan.org/~autrijus/PAR-0.86/lib/PAR/Tutorial.pod
HTH, cya!
Angelo
--
http://www.endum.net

     % pp -o packed.exe 
source.pl
        # generate packed.exe % perl
provero' grazie
alek

Ma ricorda che PAR è maledettamente lento nei tempi di avvio .. 
Perchè non usare il comerciale PERL2EXE ??
http://www.indigostar.com/perl2exe.htm

 
http://www.indigostar.com/perl2exe.htm
Newsgroup: it.comp.lang.perl
Titolo: [REQ] script cgi (free) per far recensire dischi

Salve a tutti,
curo il sito della band folk-rock Tupamaros
(htttp://
www.tupamaros.com
).
Sarebbe intenzione del gruppo dare la possibilità ai visitatori del
sito di commentare (o meglio "recensire") i dischi della band.
Si tratterebbe insomma di inserire un link ad uno script cgi che
permetta di dare un voto a ciascun disco e di inserire un commento. 
Lo script dovrebbe poi occuparsi di rendere visualizzabili i commenti
legati a ciascun disco.
Ho cercato in alcuni siti di CGI scripts free ma senza risultato: vi
sarei molto grato se ci poteste dare una mano.
Stefano Garuti 

Stefano Garuti 
Prova a cercare i cosiddetti formmail sono quei moduli da riempire e
il tasto send, tanto per essere chiari, e cerca di personalizzarli.
Segui questo newsgroup e it.comp.www.cgi (ops... già lo segui :-)
--
     Good luck!              
un...@softhome.net
     ADaM        
http://digilander.iol.it/unno2/
If debugging is the process of removing bugs,
then programming must be the process of putting them in.
(Dijkstra)

Newsgroup: it.comp.lang.perl
Titolo: file suid

Salve
per quale motivo Apache non esegue gli script Perl suid?
Grazie
Mauro
--
Posted from 
ciop.dsi.unive.it
 [157.138.20.15]
via Mailgate.ORG Server - 
http://www.mailgate.org

 per quale motivo Apache non esegue gli script Perl suid?
Sicurezza? 
Per uno che sa quello che fa (e che quindi sa anche come far eseguire tali
script) ce ne sono 10000 che farebbero danni indicibili se non ci fossero
controlli.
Comunque Apache fornisce suEXEC per eseguire script sotto identita' diverse
da quella del server (non necessariamente root). Dettagli nella
documentazione di Apache.
-- 
Maurizio M. Munafo' / 
mmmu...@usa.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Newsgroup: it.comp.lang.perl
Titolo: Come visualizzare IP ADDRESS?

Salve....
quale comando posso usare per fare visualizzare l'indirizzo IP dell'utente
che visita la mia pagina? Attenzione pero' ho gia' utilizzato REMOTE
ADDRESS, ma mi sa che non fa' al mio caso, in quanto mi segnala solo un
collegamento (che credo sia quello dove ho la mia homepage in quanto e' lo
stesso che trovo su FTP quando mi collego per scaricare qualcosa sul mio
server). Io invece voglio quello che da' il provaider dell'utente quando
accede ad internet.
Come posso fare...
Grazie in anticipo a ciunque voglia dirmi qualcosa.
Saluti Roberto
--
Posted from 
smtp4.libero.it
 [193.70.192.54] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
000701c01fea$256bbd40$66fa1b97@it...

Newsgroup: it.comp.lang.perl
Titolo: Si può controllare il client ?

Il problema è questo: il mio programma "
modifica.pl
" quando viene
chiamato da un client apre un record nel database e riempe una form con
i valori di questo in modo che l'utente da casa li possa modificare.
Naturalmente per evitare che due utenti lavorino sullo stesso record
questo viene "lockato" e quindi sbloccato dal submit dei dati di
"
modifica.pl
" verso "
conferma.pl
".
Il problema è che se i dati non vengono sottomessi il record rimane
bloccato per sempre.
Qualcuno conosce qualche trucco per risolvere il problema ?
Grazie in anticipo.
Ciao
--
Posted from 
www.allnet.it
 [195.120.231.3] (may be forged)
via Mailgate.ORG Server - 
http://www.mailgate.org

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

 Qualcuno conosce qualche trucco per risolvere il problema ?
Su un database ad accesso relativamente ridotto io ho affrontato questo
problema associando ad ogni record un campo di controllo che viene
modificato ad ogni scrittura. Se lo rimandi al client in un campo hidden e
poi lo rileggi, puoi confrontarlo con quello presente del database, per
sapere se i dati sono cambiati ed eventualmente richiederne l'inserimento.
Per esagerare io ho usato in digest MD5 della concatenazione tra un campo
chiave e l'ora di modifica :)
Il lock c'e' ugualmente (a livello di database) ma limitato al periodo di
lettura o scrittura effettiva del record. Mentre l'utente medita sui suoi
dati, non c'e' nessun lock.
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: https

Salve a tutti,
avrei bisogno di prendere informazioni da una pagine web tramite uno script 
perl ,
quindi tramite le librerie LWP , soloche questa pagina utilizza un 
protocollo HTTPS .
Qualcuno sa aiutarmi ?
Eseguendo questro scriptino
my $browser=LWP::UserAgent->new( );
unless ($browser->is_protocol_supported("https"))
{
warn "Cannot process https:// URLs.\n";
}
mi dice che io non posso processare pagine https nonostante abbai inserito :
package LWP::Protocol::https;
Vi prego di aiutarmi.
Grazie Anticipatamente

prova wrote:

http://search.cpan.org/~gaas/libwww-perl-5.805/lwpcook.pod#HTTPS
http://search.cpan.org/src/GAAS/libwww-perl-5.805/README.SSL
Ciao,
Emanuele.
Newsgroup: it.comp.lang.perl
Titolo: getlogin

Ciao,
leggendo il libro "Programming Perl" ho trovato la funzione "getlogin" e
voelvo provarla .. ho solo un problemino: la funzione fa riferimento
al file utmp in /etc/ e per quanto ne sappia io si trova in /var/adm su
TRU64 o /var/run su RH e questi sono solo 2 esempi ..quancuno di voi sa
come raggiare il problema ?
Grazie Cristina
_____________________________________________________________________________
       Cristina Bulfon              E-mail 
Cristin...@slac.stanford.edu
Stanford Linear Accelerator Center  Phone 
+1-650-926-5028
PO Box 4349, M/S 88		    Fax   
+1-650-926-3329
Stanford, CA 94309, USA
_____________________________________________________________________________

come raggiare il problema ?
Anch'io (uso Linux Debian), ho il file utmp in /var/run, ma getlogin()
funziona correttamente: credo che il Perl installato su ogni sistema sia
gia` configurato opportunamente.
Se a te getlogin() non funziona, puoi counque utilizzare getpwuid(),
che legge da /etc/passwd.
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/

Newsgroup: it.comp.lang.perl
Titolo: Catturare del testo

Volevo sapere se era possibile catturare il testo 'visualizzato' di una
pagina html escludendo cioé tutti i tag. Avevo pensato di utilizzare un
comando che elimini tutto il testo contenuto da <~~~~~> ma non so come fare.
Chi sa dirmi qualcosa?
Grazie
                                      Alessio

in article 8v0ruu$9ip$
1...@nslave2.tin.it
, the Cure at 
ales...@hotmail.com


$html = s/<[?>]+>//g;
anche se sarebbe meglio
$html = s/<!--[?>]+-->//g;
$html = s/<[?>]+>//g;
per eliminare eventuali commenti che contengano tag.
bye
silvio

Grazie mille anche per la rapidità
Ciao
                                      Alessio

 Chi sa dirmi qualcosa?
E' una FAQ.
 perldoc -q "remove HTML"
 
http://www.perldoc.com/perl5.6/pod/perlfaq9.html
Max




Grazie soprattutto per avermi fatto scoprire che le Faq  sono fatte molto
meglio di quanto potessi immaginare... Stanotte si studia!
Ciao
                                      Alessio


 controllare l'errore.
Scusa, ovviamente doveva essere $html = s/<[^>]+>//g;
non mi sono ancora abituato a questa cavolo di nuova tastiera del Mac che ha
adottato il layout PC. Sapessi quante m al posto di virgole e w al posto di
z mi scappano :)
bye
silvio

 > C'č qualcosa che non va: mi cancella tutto. Sulle Faq (come consigliato

Newsgroup: it.comp.lang.perl
Titolo: carattere //

Salve sto impazzendo!!
come faccio a fare il carattere // senza che l'operatore 
s impazzisca?? 
esempio
s/esempio/ftp:///g

Scommetto non ti aspettavi una cosa del genere, no ?!?!
$a=~s#esempio#ftp\:\/\/#g;
in realta' basterebbe:
$a=~s#esempio#ftp://#g;
Ma e' meno sicuro, tutti i caratteri particolari andrebbero "escapati" (bel
termine!).
Il trucco consiste nel fatto che NON e' obbligatorio usare il carattere /
come divisore.
Allora io utilizzo # come divisore e / diventa quindi SOLO un normale
carattere ! (che come tanti conviene convertire in una sequenza di escape :
\/
Alex
P.S. Fammi sapere che effetto ti ha fatto ?!? Un mio amico c'e' rimasto
malissimo, il fatto e' che non c'e' nulla da fare, bisogna che vi mettiate a
leggere Programming Perl 3ed. di Larry Wall, altrimenti si conosce solo il
30% di perl (con tutti gli altri libri).
Fabrizio ha scritto nel messaggio ...



Usa un altro carattere come delimitatore. p.e.
s'esempio'/'g
HTH

 wrote in message
news:slrn95ui6i.1...@localhost.localdomain...


...


                        ^ uno di troppo...
Newsgroup: it.comp.lang.perl
Titolo: PERL E MODULI

Ho trovato su
http://aspn.activestate.com/ASPN/Modules/Perl/dist_html?dist_id=9002
la descrizione del  modulo HTTP-Request-Form
che devo installare sulla mia macchina win2000 per poter eseguire uno script
su un server remoto passandolgli dei parametri
(es: 
www.miosito.com/cgi-bin/programma.pl?id=1001&input=pippo....
.. etc)
ma del download di questo a altri moduli non ne vedo traccia !
Sapete dove si possono scaricare?
Sapete se Perl può eseguire con funzioni bullit-in una simile procedura
(escludendo "Location" perchè nella macchina win2000 non c'è un server web).
Grazie anticipatamente
Daniele-


su 
cpan.org
 c'e' sicuramente.
--
Mario Rizzuti

> > Sapete dove si possono scaricare?
Da una SHELL di MSDOS usa il comando PPM
e cerchi, installi, interroghi, fai tutto quello che vuoi con i moduli di
Perl.
Ciao!

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

	     Qualcuno di voi saprebbe dirmi qual è l'ordine
  con il quale il ciclo seguente restituisce le directory?
 
<CODE>
opendir(CURR_DIR, $basedir);
 while ( $curdir = readdir(CURR_DIR) ) 
{
 
}
</CODE>
	Ho come l'impressione che l'ordine non sia quello alfabetico 
	delle directory... per intenderci, quello con cui il
	comando `ls' (o `dir') restituiscono la lista.
	E allora, che ordine segue ?!
	Grazie,
	P. 
-- 
<!--_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
                      The Hacking Pages
 
www.lulli.net
-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-->

 	E allora, che ordine segue ?!
Ciao,
  IIRC, è l'ordine 'naturale' dei file nella directory, in altre 
parole è 'system dependant', anzi 'file system dependant'. Se il 
codice deve essere portatile meglio evitare di fare ipotesi
sull'ordine.
-- 
Leo "TheHobbit"
One Ring to rule them all, One Ring to find them,
One Ring to bring them all and in the darknes bind them
In the land of Mordor where the Shadow lie.

 sull'ordine.
  Uhm... è seccante, anche se... il mio problema risiedeva nel fatto
  di non considerare debitamente le maiuscole; queste sulla mia
  piattaforma vengono dopo le minuscole:
	  z viene prima di A
 
  Comunque, ho risolto; prima di capire 'sto fatto mi stava prendendo
  la paranoia, credevo che la macchina mi perseguitasse :-)


   la paranoia, credevo che la macchina mi perseguitasse :-)
Beh, che c'è di strano? è l'ordine normale tramite codice ASCII... anche
se tu usassi sort, come in
   my @files = sort readdir(DIR);
la paranoia colpisce ancora....:)


 ASCII... anche se tu usassi sort, come in
 
  Nulla, se no non sarebbe paranoia :-)

Newsgroup: it.comp.lang.perl
Titolo: discussione

Scusate se sono a scrivere questo sfogo e vi chiedo a tutti di rispondermi
i fatti: sono ormai oltre 3 mesi che posto e chiedo sempre la stessa cosa e
non so piu cosa pensare
la mia richiesta e semplice uno script in perl o php per utilizzare la
vendita attraverso bancasella
1 sono gia convenzionato ho gia in mio possesso le passw e relative
spiegazioni ma non sono in grado di interfacciare il mio software un
semplice carrello free fatto in perl con la banca sella sembrera strano ma
non so farlo allora chiedo a voi tutti ma e mai possibile trovare questo
script comprandolo non voglio appogiarmi a nessuno voglio entrarne io in
possesso io installarlo ed eventualmente se mi va venderlo non capisco i
falsi moralismi riguradanti coloro che mi chiedono se e per me cosa ne
voglio fare voglio acquistarlo logicamente ad un prezzo decente  e non  come
alcuni prezzi incredibili che ho trovato infatti i prezzi variano dalle
400.000 ai quattro milioni voglio solo chiarezza e rapidita se qualcuno si
sente in grado di soddisfare queste mie richieste mi mandi un e-mail
mag...@magia96.com
scusate i tanti voglio che ho messo ma sono esasperato
in attesa saluto cordialmente tutti
ps il mio server
Sistema Operativo Linux 2.0.30
Web Server  Apache 1.2.6
Compilatori Interpreti Perl 5.xx, Java, C++
Librerie CGI.pm, GD.pm, CGI-LIB.pl

 ha scritto nel messaggio
news:8hh519$qc5$1...@news.IT.net...


vendita attraverso bancasella
Secondo me la cosa che ti conviene di piu' e' imparare un linguaggio
come perl o php e farti da solo il programma, per i seguenti motivi:
1) se si verifica qualche problema sai dove mettere le mani senza
appoggiarti a nessuno: l'hai sviluppato tu.
2) non devi pagare niente a nessuno e puoi eventualmente rivendere il
tuo lavoro senza nessun problema
3) impari un linguaggio che ti potrebbe servire anche per altre
applicazioni in futuro.
cordialmente saluto
PSQ

secondo te la gente deve lavorare gratis ??
400klire per uno script mi sembra un prezzo molto basso: sono il costo
di 3-4 ore di un programmatore che non si fa pagare nemmeno molto !
Se non sei disposto a pagare, allora perchè non investi due o tre mesi
del tuo tempo per impararti un linguaggio e te lo scrivi da solo ?
-- 
-------------------------------------------------------------------------
Hosting professionale a prezzi USA? 
http://www.servitelit.com/prezzi.htm
-------------------------------------------------------------------------

 wrote in message
393F3FBC...@servitelit.com...

Newsgroup: it.comp.lang.perl
Titolo: Perchè I. Explorer non esegue lo script in perl ?

Premesso che sono inesperto sul perl, non riesco a capire perchè il browser
I. Explorer non esegue i seguenti programmini:
<html>
<body BGCOLOR=#FFFFFF topmargin="8">
<script language="PerlScript">
print "Ciao Mondo ! \n";
</script>
</body>
</html>
<html>
<body BGCOLOR=#FFFFFF topmargin="8">
<script language="perl">
print "Ciao Mondo ! \n";
</script>
</body>
</html>
Ringrazio per l'aiuto

 browser I. Explorer non esegue i seguenti programmini:
Sicuro sia tutto installato e configurato bene? Controlla qui se hai 
dimenticato qualcosa.
http://aspn.activestate.com/ASPN/docs/ActivePerl/Components/Windows/PerlScript.html
Max

Newsgroup: it.comp.lang.perl
Titolo: comando select e opzioni in perl

Devo fare girare in perl il seguente form :
 <I><FONT SIZE="4"><FONT COLOR="WHITE">Modalit&agrave; di pagamento
      desiderata : <SELECT NAME="pagamento" SIZE="1"><OPTION>RiBa 30
       gg fm<OPTION>RiBa 60 gg fm<OPTION>bonifico b. 30 gg
fm<OPTION>bonifico b.
       60 gg fm</SELECT></FONT></FONT></I></P>
     </DIV><DIV ALIGN=JUSTIFY>
     <P ALIGN=JUSTIFY>
      <I><FONT SIZE="4"><FONT COLOR="WHITE">Banca : <INPUT TYPE=TEXT
NAME="banca" SIZE="55" MAXLENGTH="256"></FONT></FONT></I></P>
     </DIV>
Non ho problemi perche' funzioni la stringa che riguarda la banca.
}
if ($INPUT{'pagamento'}) {
 print MAIL ("$INPUT{'pagamento'}**pagamento\n");
}
if ($INPUT{'banca'}) {
        print MAIL ("$INPUT{'banca'}**banca\n");
}
Mentre non so come vadano tradotte il select (pagamento) e le relative
opzioni.
Grazie per il suggerimento (se possibile in email) a 
bian....@tin.it
.
Mario

 opzioni.
Devi conosce il formato con cui le selezioni multiple sono passate tramite
CGI. Se ricordo bene, si tratta di un elenco separato da NULL. Dovresti
verificare l'RFC corrispondente.
 
Personalmente, mi sono sempre guardato bene dal dovermi preoccupare di
simili dettagli: usando CGI.pm, ti ritrovi tutti i dati in un array, se la
variabile permetteva selezioni multiple.
 
    @selected = $query->param('pagamento');
 
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: perl script hosting

Qualcuno ha idea dove esista un server in grado di ospitare gratis il mio
script perl, che gira stand alone, ed occupando poche risorse (comunque
costanti). ?
Grazie
Simon



Non so cosa faccia il tuo script ma ti consiglio prima di installare un 
interprete Perl e un webserver sul tuo PC per fare le prove :-)
	- Enrico
 

 ha scritto nel messaggio
news:WkFf9.91459$pX1.3...@news2.tin.it...


 ha scritto nel messaggio
news:20020911155644.48a...@pisa.iol.it...


 ha scritto nel messaggio
news:vQIf9.11219$Oz2.2...@twister2.libero.it...


 ha scritto nel messaggio
news:vQIf9.11219$Oz2.2...@twister2.libero.it...
