mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.perl
Titolo: leggere file su altro server

Dovrei leggere una pagina html da altro server (dominio), memorizzarla in un
@array (o altra variabile) e quindi "buttarla" di nuovo fuori come pagina da
visualizzare.
Ho provato:
open(FILE,"< //
www.sito.it/index.htm
");
@pagina=<FILE>;
close(FILE);
print "Content-type: text/html \n\n";
print "@pagina\n";
ma la pagina non si visualizza, la variabile pare non contenere nulla.
Questo script l'ho eseguito sia dal mio PC (la connessione a internet
parte), sia sul mio sito abilitato ai CGI.
Ho tentato anche con Net::FTP, scaricando il file sul pc per poi ri-aprirlo
e visualizzarlo: sul mio PC funziona, sul server del provider NO (non
dispone del modulo Net::FTP??)
Mi date qualche suggerimento, dato che VOGLIO ottenere questo risultato sul
server del provider  ???
Grazie.

probabilmente non ha Net::Ftp
prova con LWP::UserAgent:
http://www.perldoc.com/perl5.6.1/lib/LWP/UserAgent.html
se puoi collegarti in telnet/ssh e usi unix/linux  puoi installare moduli 
perl anche se non sei il superutente.
-- 
Valter Mazzola -  Software/Databases for Enterprise Web Internet Sites
PHP, Java Servlets, Applets, Jsp, ASP, PERL, Mod_Perl, Apache, IIS,SQL
* 
HTTP://SITIDINAMICI.COM/?nttp
 ----- 
http://italia.LinSwap.com/?nttp
 
Phone:(+39) 347/129-07-16.  Fax:(+39) 02/700-539-403


usa LWP::Simple
---
Mario Rizzuti

Newsgroup: it.comp.lang.perl
Titolo: Imprare il perl!!!

Ciao a tutti avrei bisogno di sapere dove trovo documenti magari in italiano
sul perl di base....
Grazie Luca.
P.S.: possibilmente per linux.....

sul perl di base....
http://www.perl.it.org
 (segui il link per il tutorial)
e:
http://www.perl-it.org/link.html
	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!


http://www.perl-it.org/link.html
Grazie Ciao, Luca.
Newsgroup: it.comp.lang.perl
Titolo: htpasswd e Perl?

Ciao a tutti,
vorrei sapere se qualcuno puo' darmi una dritta riguardo a come sia
possibile in uno script Perl (di cui per altro sono un neofito) eseguire
un programma standard Unix che richieda una password in modo interattivo
(es. htpasswd). Cio' che vorrei fare e' un CGI richiamabile tramite una
form che ad esempio inserisca un nuovo utenti in una macchina remota.
Pensate che la cosa sia fattibile in modo (abbastanza) semplice?
Grazie mille per... qualunque tipo di risposta!

 c'e` un amministratore capace di editare due files...
ad ogni modo la mia domanda era diversa (come inserire un nuovo utente
nel file .httpasswd), ma forse ho trovato la soluzione:
- potrei utilizzare la funzione "add" del modulo HTTPD, giusto???
Ciao.

 wrote:
: ad ogni modo la mia domanda era diversa (come inserire un nuovo utente
: nel file .httpasswd), ma forse ho trovato la soluzione:
: - potrei utilizzare la funzione "add" del modulo HTTPD, giusto???
Certo. Nella man page di HTTPD::UserAdmin c'e` l'esempio di come
fare per usare la add().
Negli HTTPD-Tools ci sono anche alcuni script di esempio. Uno e` bhtpasswd,
la cui documentazione dice:
   ---------------------------------------
=head1 NAME
bhtpasswd - Batch updates for HTTP server user databases
=head1 DESCRIPTION
This script is meant for adding many users at a time to a user database.
From stdin, it reads newline delimited records and whitespace
delimited fields.
Where required fields are: 'username' 'password'.
   --------------------------------------
C'e` anche uno script 
htpasswd.pl
, la cui documentazione dice:
1. Place your config info after the __END__ token in the script.
2. Edit the script to suit your needs
3. Don't use the script at all
:-)
-- 
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: Array multidimensionali

Come si fa' a realizzare un array mulitidimensionale?
Mi serve per fare una tabella tipo  array[0..20][0..20] da inidrizzare come 
array[3][4] etc..
Grazie e ciao
        Renato

 array[3][4] etc..
	perldoc perllol
-- 
Alla prossima,
Marco
Newsgroup: it.comp.lang.perl
Titolo: E adesso coem lo cancello questo file? :-(

Mi e' capitato di dover cancelalre un file. Ho guardato sul mio
manuale e li' sembra che si debba usare:
unlink <nomefile.ext>;
Ma non succede niente! Il file rimane al suo posto.
Considerate che ho provato anche unlink 'nomefile.ext';
Sia la directory che il file sono chmod 777
Cosa sto sbagliando?
Grazie

 Cosa sto sbagliando?
Puoi chiedere al sistema operativo di cancellare il file.
per esempio puoi utilizzare:
system "rm nomefile";
oppure:
`rm nomefile`;
questo supponendo che tu stia utilizzando una qualche versione di unix
(come fai intendere),
altrimenti devi utilizzare il comando di sistema appropriato per
rimuovere i file (al posto di "rm")
-- 
Ciao,
Luca "!KiChKaHa!" Barbetta.

Cerca di capire _perché_ non viene cancellato prima di disperarti.
Subito dopo l'unlink inserisci
	print "$!" if $!;
che scrive il messaggio di errore del S.O.
Distinguere tra un problema di permessi e il fatto che la tua
directory corrente non č quella che immagini diventa piů semplice...
Saluti
	Davide


------------------------------------------
Davide Migliavacca - Inferentia, Milano IT
Phone +39 2 59928.1 Fax .221
------ Standard disclaimer applies -------

Tutto a posta, grazie. Il problema era che immagazzinavo il nome del
file da cancelalre in un variabile utilizzando l'apice singolo, e
quindi anziche' il contenuto della variabile veniva memorizzato il suo
nome.

Newsgroup: it.comp.lang.perl
Titolo: problemucci con Netfirms.com


oppure <a href=/files/file.xxx>
oppure.....non lo sò   lo avevo premesso che la domanda era abbastanza
semplice ......per voi spero,per me non lo è.......ho cercato sulla rete
qualche sito di netfirms ma non ne ho trovato nemmeno uno,per andare un pò a
sbirciare..
Ti ringrazio per l'attenzione.ciao nicola.


Basta vedere la sezione supporto di netfirms:
http://www.netfirms.com/support
La docuntazione è sufficientemente dettagliata e troverai tutte le 
risposte alle tue domande.
Ciao.
Marco Gazerro

Newsgroup: it.comp.lang.perl
Titolo: Cosa mi serve?

Ciao a tutti, sono arrivato al punto che devo prendere il toro per le corna
e quindi imparare il linguaggio perl.
Un po' di documentazione l'ho già reperita. Mi manca il software...
Cosa mi serve di prg soft per sviluppare i miei scripts? Ci sono prg
freeware oppure anche a pagamento?
Un grazie a tutti per le risposte.
Ciao.

Siccome immagino che lavori su Windows prova a cercare Perl su
PerlMongers (
www.perl.org
). Mi ricordo che da qualche parte c'è un
compilatore per Windows e molta documentazione.
Buon divertimento! :)

-- 
Sebastian Konstanty Zdrojewski
Development Director SKZ Services - Italy
http://www.skzservices.com
zdroj...@skzservices.com
Tel. (+39) 03483543477
Newsgroup: it.comp.lang.perl
Titolo: Problemi con Perl Activestate e DBI

C'e' probabilmente qualcosa che non ho capito e che sto sbagliando.
Non ho trovato nella distribuzione standard dell'ActiveState i moduli DBI.
Bisogna farne a meno?
Ho provato ad installare i moduli DBI e DBD trovati su CPAN, ma non
funzionano (non si installano con il normale 
makefile.pl
). Non ho avuto
invece problemi con la distribuzione CPAN (perl5.00402-bindist04-bc), ma
ovviamente con quella distribuzione non ho i valori aggiunti di perlEx
ecc...
Scusate l'ignoranza, grazie per ogni suggerimento
Maurizio

ecc...
prova a dare un'occhiata a:
http://www.activestate.com/packages/zips/
sono tutti lģ, sono gią compilati e li puoi installare con il PPM.
__END__
# Aldo Calpini
print sort {$_{$a} cmp $_{$b}} values %{{split undef,
"xritajbugne fahokem csuctawer jhdtlrnpqloevkshpr"}};

ecc...
Poichè usi activestate ti conviene andare su
http://www.activestate.com/packages/zips/
e scaricare da lì i moduli che ti servono, sono (quasi)
autoinstallanti
Ciao
Andrea

Newsgroup: it.comp.lang.perl
Titolo: Problema di conversione

Vorrei convertire una piccola applicazione che ho scritto in Perl, in C.
Purtroppo nell'Ansi C non sono implementate le regex e le librerie che
ho provato non mi sono state d'aiuto. Per caso qualcuno che ha havuto la
stessa mia esigenza ha trovato qualche soluzione?
-- 
"When hours have gone by, i'll close my eyes
In a world far away, we may meet again
But now hear my song, about the dawn of the night
Let's sing the Bard Song"
-- Blind Guardian, "The Bard Song" --

 stessa mia esigenza ha trovato qualche soluzione?
prova
perldoc perlembed
e scaricati da CPAN il modulo ExtUtils::Embed dove vovresti trovare
info.
Un buon capitolo lo trovi sul libro "Professional Perl Programming"
della Wrox. Oltre ovviamente al Camel3.

 della Wrox. Oltre ovviamente al Camel3.
Grazie mille! :)
-- 
"...adesso questa equazione la reciprocizzo...
...ci sono vari metodi, ma questa e' la logica piu' logica...
...questa espressione e' uguale, ma diversa..."
-- La mia Prof. di Matematica --
Newsgroup: it.comp.lang.perl
Titolo: perl e palm os

ho provato a cercare in giro, ma non ho trovato (forse per mia 
incapacita') nessuna info...secondo voi esiste un modo per usare il 
perl su un palmare con palm os (nello specifico un handspring treo 90)?
alek
-- 
agente operativo del BINT
appartenente ai gruppi d'assalto del SCS
presidente del LSFC
hacker della terribile banda del localhost

 perl su un palmare con palm os (nello specifico un handspring treo 90)?
Non mi risulta che esista un port di Perl per Palm.
Le ragioni di questa mancanza, mi pare, sono da ricercare nella
maniera in cui PalmOS gestisce la memoria: in estrema sintesi il
compilatore (o una sua parte, non ricordo) non puo` stare in un
segmento. Non so se qualcuno ha invece portato Parrot su Palm;
e` possibile che la differente architettura della VM possa
rendere piu` facile un porting: e questo in un futuro non so
quanto prossimo si tradurrebbe nella possibilita` di usare
Perl 6 sui Palm.
Maggiori info sullo stato attuale in un paio di thread su Perlmonks:
 
http://www.perlmonks.org/index.pl?node_id=68865
 
http://www.perlmonks.org/index.pl?node_id=64087
Se comunque vuoi sviluppare programmi sul e per il Palm, al tempo
avevo trovato questa pagina di puntatori (che immagino tu conosca
gia`):
 
http://goanna.cs.rmit.edu.au/~winikoff/palm/dev.html
ciao,
S.
-- 
http://larsen.perlmonk.org

 Non mi risulta che esista un port di Perl per Palm.
che sia per quello che non ho trovato nulla? :)
beh, peccato, avevo in mente uno script veramente utile, e adesso mi 
tocca scriverlo diversamente :(


 tocca scriverlo diversamente :(
Se mi trovassi nella stessa situazione, penso che lo scriverei
in Python. Di che si tratta, se posso chiedere ?


 
devo fare un programmino che mi calcoli il turno lavorativo di un 
qualsiasi giorno futuro. i passi necessari sarebbero:
calcolare la differenza tra il giorno da calcolare e un giorno di 
"inizio".
fare un modulo 10 di detta differenza
stampare il risultato


Newsgroup: it.comp.lang.perl
Titolo: Occhio ai Preliminari.

Salve a tutta la ML. 1)Perchè se eseguo uno script perl, prima dell'output,
ottengo questi messaggi? Come posso rimediare?
[cosmic_NRG@localhost perl_test]# ./find_.pl
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
LANGUAGE = (unset),
LC_ALL = "it_IT",
LANG = "it"
are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
find_.pl       #queste righe sono l'output#
html_gen.pl
    ###########################

 .....
E' la nuova moda postare sempre le stesse cose ad intervalli regolari di tempo?
E' sempre impossibile allo stesso modo risponderti senza avere la bacchetta
magica. o enza vedere il codice di 
find.pl
-- 
Saluti,
Giancarlo
Newsgroup: it.comp.lang.perl
Titolo: mettere @array in due colonne

ho un @array con dentro tanti valori
vorrei stamparli su due (tre, quattro,...) colonne
qualche suggerimento?
esempio
@array = qw(a b c d e f g h i);
output:
a  f
b  g
c  h
d  i
e
la cosa mi servirebbe come output in html (usando il <table>)
grazie per qualsiasi idea, anche poco ortodossa, ma preferibilmente un qualche
modulo che fa già tutto :-))))
ciao, antonio

 modulo che fa già tutto :-))))
Metti l'array in una matrice e prova ad usare uno dei moduli che ti stampano
una tabella HTML a partire dalla matrice.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

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

}
 Sorry :-(


 ICQ# 1980563

Newsgroup: it.comp.lang.perl
Titolo: permesso in scrittura

Salve,
      ho uno script che fa uso del comando touch per aggiornare il 
timestamp (mtime) di un file (che viene creato la prima volta appunto 
con touch)
purtroppo sembra che alcuni web server rifiutino di creare il file...ma 
mi sembra di avere permessi in scrittura dato che con perl riesco a 
scrivere files...che succede?
grazie


Sicuro di essere in grado di lanciare comandi esterni, e che touch
esista sui server suddetti? Da "dentro" Perl puoi utilizzare
File::Touch (è un modulo solo in Perl, per cui non dovresti avere
problemi a portartlo appresso).

Newsgroup: it.comp.lang.perl
Titolo: MySQL - Perl DBI Aiuto!!

Salve
recentemente sto provando ad installare nel mio sistema ( RedHat 6.0 )
i moduli e quanto necessario per poter gestire un database MySQL con
il perl. Il problema e' che sul sito 
www.mysql.com/Contrib
 mi dice che
dovrei installare le seguenti cose:
1) Data Dumper
2) DBI
3) msql-mysql-modules
scarico i 3 file .tar.gz, li scompatto (premetto che ho gia' il MySQL
installato e perfettamente funzionante) e faccio l'installazione.
I primi due me li installa, il terzo si blocca dicendo che non trova
il modulo Data-showtable. Scarico anche quello, scompatto e installo.
Rilancio il msql-mysql-modules e mi da' un altro errore di non
precisata natura (mi pare che non trovi addirittura il DBI).
Provo allora a scaricarmi gli RPM e a installare quelli, ma nisba,
ogni prog. in perl che cerca di accedere ad un db, mi dice che 
non trova il modulo Mysql.pm.
Qualcuno che c'e' riuscito, mi puo' spiegare dettagliatamente quali
pacchetti usare e in che ordine/come installarli?
Grazie

 non trova il modulo Mysql.pm.
Mysql.pm è la vecchia interfaccia (quella senza DBI) 
quindi non devi installare DBI ma semplicemente mysqlmodules (o come diavolo
si chiama)
per sicurezza guarda in testa ai tuoi programmi:
se c'è scritto use Mysql; si tratta della vecchia interfaccia, se c'è
scritto use DBI; è la nuova, 
se devi scrivere un nuovo programma ti consiglio caldamente di usare DBI!
Ciao
-- 
----------------------------------------------------------------------------
| °       Claudio Della Ciana        | pynhqvbq...@rznvy.pbz       ° |
| °      >-------------------<       | (apply a rot13 to reply)          ° |
----------------------------------------------------------------------------
Newsgroup: it.comp.lang.perl
Titolo: Prova

Per prova scusate.

 Per prova scusate.
Dalle mie parti si dice che 'Le prove si fanno al prato'.
Su Usenet invece le prove si fanno su it.test
In ogni caso NON su it.comp.lang.perl
ciao, marco
--
Marco Cacchiani                                
e-mail:ma...@sirius.pisa.it
Public pgp key:         
http://www.sirius.pisa.it/marco/pgp_public_key.asc
Sirius Servizi Informatici                     e-mail: 
in...@sirius.pisa.it
Parco Teatro Pasolini, 1                       Phone:  +39 (50) 865120
I-56019 - Vecchiano                            Fax:    +39 (50) 860260
(Pisa - ITALIA)                                
http://www.sirius.pisa.it/

Newsgroup: it.comp.lang.perl
Titolo: MYSIMPLENEWS[1.9]

Come sapete e da un po che mi dedico a questo programma per gestire le
news... 
tale programma [1.9] sarà finalmente disponibile per tutti...
In questa release risolti molti bugzz ...
ma prima mi servono gli ultimi consigli...
per entrare andare qui:
http://www.theartofweb.f2s.com/cgi-bin/MYSIMPLENEWS/login.cgi
poi digitare ajax come password...
invece per vedere i titoli delle news andare qui:
http://www.theartofweb.f2s.com/NEWS/news.html
Grazie a tutti!

 
il tutto è scaricabile da qui:
http://www.redangel.it/Click_file.asp?m=400

Newsgroup: it.comp.lang.perl
Titolo: Espressioni Regolari

Salve a tutti,
vorrei sapere cosa succede se si mette il carattere una 'o' sopo
un'espressione regolare...esempio :
/ espressione regolare /o
grazie e ciao
--
"L'unica vera autorità deriva dalla conoscenza,
non dalla posizione."
Gazza

 
Da perlop:
                                     If you want the
       pattern compiled only once the first time the
       variable is interpolated, use the `/o' option. 
 
Se il pattern contiene riferimenti a variabili, l'interpolazione delle
stesse viene ripetuta ogni volta che l'espressione viene valutata e il
pattern viene quindi ricompilato. Se vuoi che questo avvenga solo una
volta (perchè, ad es, sai che il valore delle variabili non cambia) usi
l'opzione '/o'.
Max

 l'opzione '/o'.
Quindi se ho un'espressione regolare di questo tipo :
/.+?sostantivo \"([a-zйитунмабъщывкофьдлпцгхз0-9\'\'\°\+\-]+?)\"
\[[0-9a-z,\s=\(\)\d]+?\]; sostantivo \"([a-zйитунмабъщывкофьдлпцгхз0-9\'
\'\°\+\-]+?)\" \[[0-9a-z,\s=\(\)\d]+?\].*?/o
e la stringa alla quale viene applicata и :
"sostantivo "extreme" [non nel dizionario]; sostantivo "marmolada" [non nel
dizionario]; sostantivo "5" [non nel dizionario =(5)];
i valori di $1 e $2 devono essere extreme e marmolada o marmolada e 5?
ciao
--
"L'unica vera autoritа deriva dalla conoscenza,
non dalla posizione."
Gazza

i valori di $1 e $2 devono essere extreme e marmolada o marmolada e 5?
Questo lo ignoro.
Suggerisco di scegliere un local appropriato e fidarcivisici, e usare \w in
luogo dell'elenco di tutte le lettere. Forse anche dividere l'analisi in
piu' momenti potrebbe aiutare.
Ciao.
Newsgroup: it.comp.lang.perl
Titolo: Ciao!!!



guida al perl che cominci dalle cose di base ( Non chiedo cxhe mi si spieghi
Guarda la sezione link su:
http://www.perl-it.org
	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!

La guida html più completa al linguaggio la trovi
già installata sul tuo computer, è quella della active
state("c:\$perl_path\html\index.html").
Per cominciare a prendere confidenza con il perl prova
il tutorial su 
www.cgipoint.it
,
sito a cui vale la pena dare un'occhiata.

Newsgroup: it.comp.lang.perl
Titolo: Problema con le date

ciao a tutti,
sto facendo un programma in perl che (tra l'altro) ha bisogno di
confrontare due date. Siccome non posso usare niente che non sia
nell'installazione standard di perl *sigh* avevo pensato di usare la
funzione timelocal, così da convertire la data in secondi e fare un
facilmente un confronto. 
Pero', ovviamente, ci sono problemi: le date prima dell'1/1/1970 le
tratta in malo modo :-(
domanda: sapete come posso risolvere il problema?
non so, timelocal conta i secondi dall'1/1/1970, si puo' cambiare la
data dalla quale calcola i secondi passati?
o avete qualche idea migliore?
grazie a tutti quelli che risponderanno,
ciao,
tanilo

 o avete qualche idea migliore?
Se devi solo _confrontare_ le date, non servono grandi calcoli.
Potrebbe andar bene questa funzione ? (Ho incluso qualche caso
di test tanto per far vedere che pare comportasi bene).
use strict;
use warnings;
sub compare_dates
{
    my ( $d1, $m1, $y1, $d2, $m2, $y2 ) = @_;
    return $y1 <=> $y2 ? $y1 <=> $y2 :
           $m1 <=> $m2 ? $m1 <=> $m2 :
                         $d1 <=> $d2 ;
}
use Test::More qw/ no_plan /;
is( compare_dates( 1, 1, 1970 => 1, 1, 1970 ),  0, "Lo stesso giorno" );
is( compare_dates( 1, 1, 1970 => 1, 12, 1970 ), -1, "12 mesi dopo" );
is( compare_dates( 1, 1, 1970 => 31, 12, 1969 ), 1, "Il giorno prima" );
is( compare_dates( 1, 1, 1970 => 1, 1, 2000 ),  -1, "30 anni dopo" );
is( compare_dates( 1, 1, 2004 => 19, 1, 2004 ), -1, "19 giorni dopo" );
ciao,
S.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it

o avete qualche idea migliore?
Incorporare nel tuo programma un qualche modulo in perl puro per il
trattamento di date? Mi sembra di capire che ti basti calcolare il giorno
giuliano, operazione più semplice che calcolare i secondi, con l'eventuale
intrigo di ora legale, secondo aggiuntivo, ecc.
Ciao.

S.
grazie,
danilo
Newsgroup: it.comp.lang.perl
Titolo: UID

Leggendo la documentazione ho letto che il Perl fornisce 2 tipi di UID :
efficace $< e reale$>. La documentazione non spiega però quale è la
differenza.
Non mi è inoltre chiaro la portabilità di queste variabili: non vorrei che
funzionasse solo in ambienti unix-like.
Ultima cosa: non ho capito bene come in Perl posso cambiare l'UID dello
script in modo da poter accedere in scrittura sul file system locale quando
non è permesso.
grazie epr l'attenzione

come posso importare un db in msaccess
in mysql (win) ?
ciao e grazie
Rob

 in mysql (win) ?
A parte che sei terribilmente OT, perchè ti sei appiccicato ad un post
che con il tuo non c'entrava niente?
-- 
echo f 0:0 ffff 0 | debug
La leggerezza del VOLER essere ....

Newsgroup: it.comp.lang.perl
Titolo: CGI che richiamano file esterni.....





Salve a tutti.....


Ho intenzione di sviluppare il mio sito in modo che 
le pagine vengano richiamate tramite un cgi che a sua volta richiama terzi 
file da inserire al suo interno.....


mi spiego meglio:


Voglio fare in modo, ad esempio, che la 
struttura della pagina sia sempre la stessa, mentre i dati al suo interno 
vengano ottenuti da file esterni come ad esempio pippo.txt.....


in questo modo da una pagina index.htm, su un 
link ipertestuale punto su un file /cgi-bin/link?pippo cosícche il cgi mi 
apra la struttura della pagina in creazione grazie a se stesso, e ci metta 
dentro tutto quello che trova da pippo.txt.... o paolo.txt se il cgi punta a 
/cgi-bin/link?paolo...... insomma il cgi dovrebbe chiamarsi link e puntare al 
file che si trova dopo ?


In questo modo, nel momento in cui magari in futuro 
voglia cambiare il layout delle pagine ma mantenere intatti i dati, mi 
basterebbe modificare il solo file cgi cosí da applicarlo a tutte le 
richieste.....


Penso si sia capito a cosa miro.....


 


 



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

In pratica lo script di base che avevo cominciato a fare per me è questo, e
viene chiamato attraverso
http://ecc/cgi-bin/filecgi.cgi?paolo.txt
I file di testo che uso sono non formattati, cioè senza carattere ''a
capo'', infatti il comando open è stato modificato (su suggerimento del ng)
si potrebbero anche aggiungere altri parametri tipo
http://ecc/cgi-bin/filecgi.cgi?paolo.txt&header&footer
solo che,essendo un ultra principiante, non so come si faccia a separare
paolo.txt&header&footer
in tre variabili in modo che
paolo.txt = var1
header = var2
footer = var3
hai qualche idea?
#!/usr/bin/perl
$| = 1; #questa cosa non mi ricordo a cosa serva.... forse qualcosa che ha a
che fare con la cache??? boh
print "Content-type: text/html\n\n";
print "<html><head><title>Test Page</title></head>\n";
print "<body>\n";
open(FILE2,"$ENV{'QUERY_STRING'}");
while(<FILE2>) { print $_.'<br>' }
print "</body></html>\n";
exit;
Newsgroup: it.comp.lang.perl
Titolo: valutare testo in base a white list

ciao a tutti,
ho diversi testi che devono essere valutati in base ad un elenco di parole, 
il criterio/algoritmo di valutazione che sto adottando in partenza è
testo contiene almeno 1 parola della white list? --> rank = 1
testo non contiene nessuna parola della white list? --> rank = 0
mi piacerebbe molto però che rank fosse un real tra 0 e 1 ... ;)
qualche idea?
grazie.
Mario
__________________
www.mario-online.com
__________________

 qualche idea?
Moltissime. Ottimo argomento per una test di informatica.
(ma il Perl che c'entra ?)
  Raffaello

(ma il Perl che c'entra ?)
Ehm...dimenticavo....la richiesta si riferisce ad una funzione che devo 
inserire in un progetto Perl che tra l'altro si occupa di reperire i vari 
testi, cosě la mia speranza č che qualcuno conosca qualche modulo o script 
che mi agevoli...;)
Mario 

 qualche idea?
Per cominciare, postare su un newsgroup piu` generico :) (mi viene
in mente it.comp.programmare, senza contare i gruppi in lingua
inglese). D'altra parte si parla di manipolazione di testo, 
quindi il Perl non e` del tutto off-topic :)
Non ho mai lavorato su problemi simili, ma ricordo un articolo
che secondo me potresti studiare in cerca di qualche spunto.
* "Building a Vector Space Search Engine in Perl"
 
http://www.perl.com/pub/a/2003/02/19/engine.html
Mi pare che il tuo sia un problema di classificazione di testi.
Se e` cosi`, allora potresti guardare se le N-Gram possono fare
al caso tuo. Potresti partire da CPAN, dove si possono trovare
  Text::NGram  di José Alves de Castro
  Text::NGrams di Vlado Keselj [1]
In coda alla doc di entrambi i moduli trovi delle noti 
bibliografiche.
HTH
ciao,
S.
[1] Sul fatto che CPAN sia un posto libero, e che questa liberta`
    possa produrre casi di "omonimia" come quello citato, si 
    potrebbe discutere ampiamente. E` un fatto che l'uso di CPAN
    assomiglia ad un'arte, e che bisogna spendere del tempo per 
    imparare a sfruttarlo al meglio, e per non prendere cantonate.
-- 
Stefano Rodighiero      |  
http://larsen.perlmonk.org
mailto:
lar...@perl.it
   |  
http://www.perl.it

 In coda alla doc di entrambi i moduli trovi delle noti 
                                                    ^^^^
Oops. "Note", ovviamente.
ciao,
S.


 Molto, molto interessante. :D
mi associo!
sicuramente un buon inizio
ciao
Mario
Newsgroup: it.comp.lang.perl
Titolo: sendmail com attachment

Ciao a tutti.
Qualcuno da indicarmi i comandi per permettere au un utente di inviare un
file in attach tramite un form che utlizza sendmail?
Grazie per l'aiuto.
Luciano
A buon rendere!

Sembra che sia un mistero. Tempo fa l'ho chiesto anche io, ma nessuno mi ha
risposto in maniera esauriente.
Se scopri qualcosa e me lo fai sapere mi fai un piacere.
Ciao
Luciano ha scritto nel messaggio ...


 risposto in maniera esauriente.
Ma come? Una volta ho addirittura postato un pezzo di codice che faceva
tutto senza bisogno di moduli aggiuntivi.
Ecco tutti i miei interessantissimi interventi sul tema :-)
 
http://www.deja.com/dnquery.xp
  ?ST=MS&QRY=attachment+edgar%
40maxim.comm2000.it
&svcclass=dnserver
(riappiccicare prima dell'uso)
Ad ogni modo il mio suggerimento è di usare MIME::Lite.
Max
Newsgroup: it.comp.lang.perl
Titolo: [newbie] Errori

Sono nuovo del Perl
Uso Perl sotto windows XP
Sto cercando di far girare questo esempio, ma vengono fuori gli errori che
vi riporto. Cosa devo fare?
============================================================
Extracting visual-test (with variable substitutions)
Can't locate loadable object for module GD in @INC (@INC contains:
c:/Perl/lib c:/Perl/site/lib .) at c:/Perl/lib/GD/Graph.pm line 38
Compilation failed in require at c:/Perl/lib/GD/Graph.pm line 38.
BEGIN failed--compilation aborted at c:/Perl/lib/GD/Graph.pm line 38.
Compilation failed in require at c:/Perl/lib/GD/Graph/
axestype3d.pm
 line
30.
BEGIN failed--compilation aborted at c:/Perl/lib/GD/Graph/
axestype3d.pm
line 30.
Compilation failed in require at c:/Perl/lib/GD/Graph/
bars3d.pm
 line 29.
BEGIN failed--compilation aborted at c:/Perl/lib/GD/Graph/
bars3d.pm
 line
29.
Compilation failed in require at 
visual-test.pl
 line 8.
BEGIN failed--compilation aborted at 
visual-test.pl
 line 8.
-- 
ciao
El Bandolero

 c:/Perl/lib c:/Perl/site/lib .) at c:/Perl/lib/GD/Graph.pm line 38
Il modulo da te utilizzato non funziona senza la libreria "GD" (che non è 
del Perl ma è una libreria a parte).
Io ad esempio la uso sotto Linux (installando i vari pacchetti del tipo 
gd*).
Siamo sicuri che esista la libreria GD per Windows?


Non soltanto esiste, ma neanche ti devi preoccupare di installarla 
separatamente.
Infatti se installi il pacchetto ppm Win32 del modulo GD:
http://cpan.uwinnipeg.ca/dist/GD
viene installata automaticamente in maniera del tutto trasparente, e 
tutto funziona alla perfezione.
Ciao,
Emanuele

 tutto funziona alla perfezione.
Urca, anche meglio di Linux (dove per far girare il modulo Perl GD a volte è 
un casino perché deve combaciare con certe versioni della libreria GD).

Newsgroup: it.comp.lang.perl
Titolo: sono un novello

Ciao
sono un novello del Perl anche se so programmare in altri linguaggi (c, Java
, ......)
il mio problema è di creare delle cgi da mettere in un sito web. Consultando
un po' di manualistica mi sono fatto un'idea su come si programmi in perl e
ho buttato giù un paio di programmi.
ora mi son sorti un paio di problemi:
1) Se la mia cgi non deve fare nulla se non andare a modificare un file
(niente output per l'utente) e niente parametri come faccio a farla
richiamare dall'http quando apro una pagina web? (i miei tentativi mi hanno
portato solo a visualizzare il listato perl).
2)C'è un modo per testare le cgi in locale sotto win o linux?
Grazie mille
Draoi
(icq# 6824409)

 2)C'è un modo per testare le cgi in locale sotto win o linux?
Basta installare un server web (apache ad esempio) e l'interprete Perl,
qualsiasi distribuzione Linux li ha sul cd.
-- 
Lorenzo Pulici - 
sno...@tiscalinet.it
  - Web Design
http://milanohockey.virtualave.net
 
http://snowdog.cjb.net
http://verdebaggio.freeweb.org
 
http://members.xoom.com/Ramones/
   PGP ID: 1D33 3DE6 635E D192 F648  74D9 28A7 E921 3E1A 44F2
Newsgroup: it.comp.lang.perl
Titolo: Mettere in pausa uno script

E' possibile in Perl interrompere l'esecuzione di uno script,
cioè fare in modo che lo script esegua una prima parte di codice,
poi faccia una pausa di 10 secondi e quindi riprenda ad eseguire
la parte finale, oppure che esegua la seconda parte di codice
dopo che il browser ha mostrato completamente una certa
immagine?
Grazie.

 la parte finale, 
	sleep <number_of_seconds>
	Alla prossima,
		Marco

 la parte finale,
[root@fokhouse /root]# perldoc perlfunc | grep -A3 'sleep EXPR'
       sleep EXPR
       sleep   Causes the script to sleep for EXPR seconds, or
               forever if no EXPR.  May be interrupted if the
[root@fokhouse /root]#
Ciao ciao,
Andrea
-- 
"...Unix, MS-DOS, and Windows NT (also known as the Good, the Bad, and 
 the Ugly)."
(by Matt Welsh)

Newsgroup: it.comp.lang.perl
Titolo: copia di files

Dovrei(da uno script in Perl) copiare un file su un'altro o anche
semlicemente cambiare il nome al primo....
Es.
copiare pippo.new in pippo oppure cambiare pippo.new in pippo.
Ho visto che il perl ha una funzione rename, ma non ha dato buoni
risultati(forse ho sbagliato la sintassi).
Qualcuno sa dirmi come posso risolvere il problema?(Per favore tramite
e-mail)
            Antonello mailto:
a.al...@sistemi.it

prova con
system("mv pippo.new pippo");
oppure
system("ren pippo.new pippo");
Ciao
Andrea

rename("foo", "bar");
Sotto U*X funziona che e' una bellezza, tranne che se cerchi di cambiare
file system, cioe':
rename("/disk1/here/foo", "/disk1/there/bar"); # funziona
rename("/disk1/here/foo", "/disk2/there/bar"); # non funziona
se no, prova system("/bin/mv foo bar");
Cheers,
	Alessandro

a...@orion.it
 wrote:
 >rename("foo", "bar");
No.
rename("foo", "bar") or die "Can't rename foo to bar: $!";
-- 
ciao, | [Per rispondere togli "toglimi" dal mio indirizzo.]
Marco | * The Internet is full. Go away.  -- Joel Furr *

Newsgroup: it.comp.lang.perl
Titolo: Aiuto! Perche' non funzionano queste due righe?

Vorrei fare la cosa piu' semplice del mondo: scrivere su un file txt
la data e ora del sistema. Ho fatto cosi':
$date_location = "/bin/date"; 
$date = '$date_location'; chop($date);
Il contenuto di $date risulta essere uguale a $date_locatio (manca la
n a causa del chop).
Eppure gli apici dovrebbero far eseguire il comando, no?
Help!

s...@iol.it
 (Bud Bundy) writes:

Non l'apice ma l'accento grave. Prova cosi':
$date_location = "/bin/date"; 
$date = `$date_location`; chop($date);
-am

 n a causa del chop).
Ummmm ma perche` fai tutto quello?  Meglio i comandi time e
localtime.. man perlfunc.  O al massimo, fai $date = `/bin/date`; ma
questo e` poco portabile.
-- 
David Welton                          
http://www.efn.org/~davidw
 
	Debian GNU/Linux - 
www.debian.org
Newsgroup: it.comp.lang.perl
Titolo: New posting con Net::NNTP

',
  'Approved: 
mi...@io.com
',
  'Subject: MAO',
  'Newsgroups: tin.it.edicola.beta',
  'Message-id: <fasf...@miao.ddd.rr>',
  '',
  'Prova forum!!');
$server->post (@lines)
  or die "Can't post: $!\n";
-----
Mi torna errore all'atto del posting:
Can't post:
Penso si tratti di un problema con gli header: ho provato varie combinazioni,
ma non sono riuscito a trovare nella man page che ho sul mio sistema una
descrizione esatta di come vanno inseriti.
Ringrazio in anticipo chi mi aiutera`.
	  Michele.
-- 
Michele Beltrame
mi...@io.com
http://www.io.com/~mick/

 descrizione esatta di come vanno inseriti.
Secondo me dovresti metterne il meno possibile. Sicuramente eviterei il
message-id, che dovrebbe essere assegnato dal server, e probabilmente
l'Approved.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 descrizione esatta di come vanno inseriti.
A parte l'altra mia risposta, ho provato effettivamente il tuo script e 
ho scoperto che le righe dell'array che costituisce il messaggio devono
essere terminate da '\n'!!!
Infatti al'interno della funzione, ne viene fatto un join("",@array), con il
risultato che, se non ci sono i <cr>, il messaggio appare come una unica
stringa!
Terminandole tutto sembra funzionare correttamente, nel senso che il mio
messaggio di prova e' apparso sul server. Non ho pero' messo ne' il
message-id ne' l'approved, ma direi che almeno l'approved dovresti poterlo
mettere.
Tra l'altro, il problema dello '\n' l'ho rilevato andando ad eseguire lo
script in debug: data l'astrazione della funzione post() che chiami, andare
a scoprire esattamente in qual punto interno c'e' l'errore e che valore
hanno le variabili locali usate per fare la VERA sottomissione puo' sempre
servire.
Saluti


mettere.
Grazie 1000, ho combinato.


Newsgroup: it.comp.lang.perl
Titolo: Controllo orario e-mail

Salve a tutti.
Vorrei sapere se e' possibile, per un utente generico, alterare l'ora di
invio di una e-mail fatta tramite una form in perl.
Se si, come e' possibile in perl fare un controllo sulla veridicita'
dell'ora?
Grazie
Alberto


Non sono sicuro di aver capito la domanda quindi ti do una risposta in base
a quello che ho capito. Se ho sbagliato, scusami ed ignorami...
Se un utente arriva su un tuo sito, compila una form e preme submit, e' il
programma che gestisce questa form che si occupa di generare la mail ed
inviarla a chi di dovere. In questo caso l'ora della mail e' quella del
server, quindi non alterabile.
	Best regards,
		Kazuma
-- 
Alex Garbagnati, 
agarb...@removethis.decisive.com
Sr. Lead Engineer, Product Development
Decisive Technology Corporation
Mountain View, CA  94043


Grazie, era proprio quello che volevo sapere.
Ritenevo che dovesse essere cosi', ma non sono molto esperto quindi ho
chiesto a chi ne sa piu' di me ;-)
Ciao
Alberto
Newsgroup: it.comp.lang.perl
Titolo: E' possibile ottenere un EXE di uno Script Perl ?

ciao,
devo realizzare una applicazione sotto Explorer che avvalendosi del Web
Server di Win95 ha necessariamente bisogno di alcuni CGI per compiere
determinate operazioni (per es. l'acquisizione di dati da una Form).
Partendo da uno script Perl (che ovviamente e' leggibile da chiunque si
metta sul computer essendo un file di testo) e' possibile ottenere una
versione eseguibile della CGI, come se si stesse eseguendo una CGI
scritta in C ?
Pensate sia l'unico modo di proteggere il proprio Codice ???
Maurizio
--
Posted from 
dns.lanet.it
 [194.91.50.1]
via Mailgate.ORG Server - 
http://www.mailgate.org

Pensate sia l'unico modo di proteggere il proprio Codice ???
non so se sia possibile compilare un .pl in .exe ma considera che la
directory cgi-bin dovrebbe essere protetta da download quindi il sorgente
non e' consultabile dall'esterno...
 Ciao Ciao
 Gianni Medusa
 --------------------------------------------------
 The Ghost Boat BBS    My Home Site:
  fidonet 2:335/705    
http://www.ghostbbs.ml.org
    080-502-3688        
ftp://ftp.ghostbbs.ml.org


http://www.maxim.comm2000.it

Pensate sia l'unico modo di proteggere il proprio Codice ???
Uno script cgi non può essere leggibile da nessuno se non si ha il permesso
di lettura sulla sua drectory, ma solo essere eseguito.
Ragion per cui i cgi sono già protetti, se tu provi a scaricare un cgi,
questo non ti scarica il sorgente ma solo l'output dello stesso.
Comunque se vuoi un compilatore lo trovi su volftp anche se shareware.
Comunque c'è un ng apposito per i CGI.
Ciao
Andrea Busia
-------------------------------------------------------------------
Redattore di Ludus. (
http://www.ludus.it
)
Trucchi, Recensioni, Patch,
e tutto quello che cerchi sul mondo dei videogame
-------------------------------------------------------------------

Ciao Max,
ti ringrazio molto per la risposta. Mentre il secondo metodo che mi hai
suggerito mi e' chiaro (anche se non capisco come si possa leggere il
sorgente da un file EXE), non ho capito in cosa consiste il Perlcc: e'
un vero e proprio compilatore che produce un EXE ?
In pratica questo secondo metodo mi consentirebbe di proteggere il
sorgente ?
Bye

Newsgroup: it.comp.lang.perl
Titolo: problema utilizzo modulo GD

 spostato il mio CGI da una macchina all'altra su cui sono installati sia gd
che perl-gd ... ma sulla seconda macchina l'errore che vedo nel log di
apache è il seguente:
          Can't locate object method "newFromGif" via package "GD::Image"
... non ho trovato niente con google (a parte una lista di server con questo
errore) che mi aiutasse.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 errore) che mi aiutasse.
GD2 non include il codice per leggere e scrivere le Gif,
normalmente. Puoi ricompilare il modulo, o evitare di usare le Gif.
-- 
  dakkar
  sono su PerlMonks.org, 
use.perl.org
, PAUSE/CPAN

 errore) che mi aiutasse.
Prima di fare ricorso a Google, certe volte è meglio dare un'occhiata al 
file README allegato alla distribuzione in oggetto ;-)
------------------------------------------------------------------------
My scripts fail with "Can't locate object method 'png' via 		package 
"GD::Image".
libgd can now be built with support for one or more of the PNG, GIF, XPM 
or JPEG formats. If one or more of these formats are not supported by 
libgd, then the corresponding GD::Image methods will be unavailable. 
Unfortunately, many older scripts assume that the png() method will 
always be present. You can work around this issue with code like the 
following:
my $image = $gd->can('png') ? $gd->png : $gd->gif;
or if you prefer eval {}
my $image = eval {$gd->png} || $gd->gif;
As of libgd 2.0.33, GIF support is always compiled in, so (for the time 
being!) this is a safe fallback.
------------------------------------------------------------------------
La spiegazione fornita si adatta al tuo caso sostituendo 'png' con 
'gif'. Come vedi si tratta di un problema dovuto alla libreria libgd 
presente sulla nuova macchina, che è stata compilata senza supporto per 
il formato gif (la quale è per giunta anteriore alla versione 2.0.33, 
altrimenti avrebbe dovuto avere il supporto per le gif).
Le possibili soluzioni sono la ricompilazione di libgd abilitando il 
supporto al formato gif, oppure (meglio) l'installazione di libgd >= 
2.0.33 sulla nuova macchina.
Quanto detto vale ovviamente solo su Unix/Linux: se sei su Windows 
semplicemente installa l'ultimo package ppm GD (2.30) e verranno 
automaticamente installate tutte le necessarie librerie, già 
opportunamente compilate.
Ciao,
Emanuele.
Newsgroup: it.comp.lang.perl
Titolo: un tutorial per il perl

come da soggetto, esiste qualche sito che guida all'apprendimento del
Perl ??
qualcosa che volendo uno si scarica e poi segue e impara, per il C l'ASM
etc.
ce ne sono un infinita'..
Grazie.


Le pagine di manuale allegate a qualsiasi distribuzione di Perl.
Oppure il sito 
www.perl.com
.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@usa.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

Oppure il sito 
www.perl.com
.
Mi sembra che tra la faq e i vari perlfunc, perlsyn ecc. una guida ci
sia, ma non credo cercasse quello. Credo voglia una specie di corso.
Ciao
Andrea




Newsgroup: it.comp.lang.perl
Titolo: Errore nello script??

Ciao a tutti,
ho un problema con uno script perl che ho scaricato ultimamente, quando
cerco di compilarlo mi ritorna un'errore di "line return"
, ma non riesco a capire il perchč non dovrebbe funzionare.. :(
se qualcuno mi puň dare una mano , gli sarei grato..
allego lo script (tanto č piccolissimo) , cosě potete darci un'occhiata.
grazie mille
e ciao

se qualcuno mi può dare una mano , gli sarei grato..
Puoi scrivere esattamente il testo del messaggio di errore?
Su che computer hai scritto il programma (SO), su che piattaforma deve
girare?
Ciao
Andrea

 wrote in message
374068b6...@news.tiscalinet.it...
: >ho un problema con uno script perl che ho scaricato ultimamente, quando


Newsgroup: it.comp.lang.perl
Titolo: failed dependencies when installing a perl module(?)

I tried installing an perl-MP3-info-0.91-2.i386.rpm package, but got the
following output:
"
error: failed dependencies:
		perl(Symbol)   is needed by perl-MP3-info-0.91-2
		perl(overload)   is needed by perl-MP3-info-0.91-2
		perl(strict)   is needed by perl-MP3-info-0.91-2
		perl(vars)   is needed by perl-MP3-info-0.91-2
"
first of all, WHAT are those? i tried searching with rpmfind, but found
nothing. I also browsed the 
www.perl.org
 site, but found nothing there
either. 
I'm a little new at this, at least to programming, so any help would be
very....helpful i guess

Nils Thomas Vars wrote:

   Since "it" is for Italy and not for Information Technology, the 
official language of this newsgroup is Italian and not English.  Well, 
let try to post your question in a comp.* newsgroup, if possible related 
to the RedHat distribution installation matters.
-- 
Alla prossima,
Marco

 ha scritto nel messaggio
news:WlQH7.17158$Fr3.2...@news1.oke.nextra.no...

Newsgroup: it.comp.lang.perl
Titolo: (Quasi OT) Apache e HTTP_REFERER

Scusate, stavo modificando uno script in maniera che potesse essere usato
solo da un form su una mia pagina web, ma con mio grande terrore mi sono
accorto che apache non mi sta restituendo la variabile HTTP_REFERER. Qualche
dritta ? forse qualche libreria ?
Ciao Marco

Marco Pinna wrote:

L'environment HTTP_REFERER viene passato se il suo valore e' non nullo, 
se richiami il tuo cgi inserendo direttamente il suo url nel browser non 
hai nessun referer e quindi non avrai l'environment HTTP_REFERER. Prova 
a richiamare il cgi da una pagina html.
Comunque il ng giusto per queste domande e' i.c.w.cgi
Ciao
MjdP

 Comunque il ng giusto per queste domande e' i.c.w.cgi
Grazie ora mi sposto li.
Ciao
Marco Pinna

Newsgroup: it.comp.lang.perl
Titolo: Interrogazione di DB ACCESS

Ciao a tutti,
sono uno studente di ingegneria e devo consegnare a breve una tesina di
Perl. Il programma deve gestire le interrogazioni in rete di un DB ACCESS.
Queste interrogazioni possono avvenire o per parole chiave o per autore.
Siccome sono alle prime armi con Perl, volevo chiedere se qualcuno che abbia
già fatto un'esperienza simile mi possa, gentilmente, dare delle
informazioni a proposito o magari fornirmi il codice in questione.
Grazie in anticipo
Fredi


Da che ripo di macchina devi fare le interrogazioni?
In generale direi che dovresti usare DBI e DBD::ODBC.
Una volta che hai quei moduli, ci sono abbastanza esempi nella documentazione.
Maurizio
-- 
Maurizio M. Munafo' / 
mmmu...@netscape.net
"Consider Phlebas, who was once handsome and tall as you" (T.S.Eliot)

 in questione.
  Cerca ed installa il modulo ODBC.pm e leggine la documentazione: se
sai cosa sia un database relazionale non avrai bisogno di altre
informazioni. ;)
	Alla prossima,
		Marco

Newsgroup: it.comp.lang.perl
Titolo: Problemi con il Perl !!!

    Ciao, ho un problema molto semplice, non riesco a far funzionare il
Perl.
    Ho scaricato ActivePerl buil 615 e voglio farlo avviare uno script che
converte i file *.bin in file *.txt (si chiama 
tbin2txt.pl
), beh NON CE LA
FACCIO!! Il commando che metto č "c:\perl\perl.exe 
tbin2txt.pl
 texture.bin >
text.txt", premo INVIO, esce il terminale dove si fa lo scrolling del
contenuto del texture.bin ma non esce nessun file *.txt !!!!!!!  Gli scripts
li ho mesi nella directory c:\per\bin\, dove ho messo anche il texture.bin..
Ho windows98, il DCOM č apposto, mscvr.dll apposto, ma nON funziona!
Qualcuno ha qualche spiegazione per tutto questo???

text.txt", premo INVIO, esce il terminale dove si fa lo scrolling del
Se non redirigi l'output cosa ti esce sullo schermo?
	Michele.
-- 
Michele Beltrame
m...@io.com
http://www.io.com/~mick/
ICQ# 76660101
==> Visita il sito di it.comp.lang.perl: 
http://www.perl-it.org
==> Sei del triveneto e vuoi unirti ai Perl Mongers? Scrivimi!
Newsgroup: it.comp.lang.perl
Titolo: indicatore avanzamento esecuzione

Ciao.
tra i vari programmi che uso, c'è n'è uno (non in perl, non ho sorgente)
che mi incuriosisce perchè ha un simpatico indicatore di avanzamento:
   0      10      20      30      40      50      60      70      80     
90     100
 
v-------v-------v-------v-------v-------v-------v-------v-------v-------v-------v
 
*********************************************************************************
con gli asterischi che appaiono mano a mano che l'esecuzione proseque....
Sarei curioso di sapere se è possibile e come ricreare il codice in perl...
..anche solo uno spunto da cui partire è bene accetto
Saluti
stefano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 che mi incuriosisce perchè ha un simpatico indicatore di avanzamento:
dialog
c'è anche in cpan un front-end per il perl

 ..anche solo uno spunto da cui partire è bene accetto
http://search.cpan.org/dist/Term-ProgressBar/
E questo è ancora meglio perché testa pure se lo script è interattivo:
http://search.cpan.org/dist/Term-ProgressBar-Quiet/
Infine:
http://search.cpan.org/search?query=ProgressBar&mode=all
Ciao,
Emanuele

Newsgroup: it.comp.lang.perl
Titolo: Split di un file ...

Cari utilizzatori Perl,
come posso fare a dividere un file cosi' composto :
----------------------------
P : xxxxxxxx:xxxxxxx
C:  xxxxxxxx:xxxxxxx
P:  yyyyyyy:yyyyyy
C:  yyyyyy:yyyyyyy
P:  zzzzzzzzz:zzzzzzz
C: zzzzzzzzz:zzzzzzz
---------------------------
in file separati che contengano tutti i record P e C
Vi ringrazio per i suggerimenti
Antonello Romani
Dipartimento di Medicina Sperimentale
Universit' degli Studi di Parma

in file separati che contengano tutti i record P e C
open (TUTTI, '<nomefile.txt');
open (FILEP, '>p.txt');
open (FILEC, '>c.txt');
while ($riga = <TUTTI>) {
  if ($riga =~ /^P/) { print FILEP $riga; }
  elsif ($riga =~ /^C/) { print FILEC $riga; }
  else {
    # Metti codice qui se vuoi fare qualcosa con le righe
    # contenenti gli spazi
  }
}
close (TUTTI);
close (FILEP);
close (FILEC);
	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!