From polettix at gmail.com Tue Apr 7 01:02:23 2009 From: polettix at gmail.com (Flavio Poletti) Date: Tue, 7 Apr 2009 10:02:23 +0200 Subject: [Roma.pm] YAPC::EU::2009 Call for Presentations In-Reply-To: <4895a0700904070022u7c8e0830tfc5ca0b112faf56@mail.gmail.com> References: <4895a0700904070022u7c8e0830tfc5ca0b112faf56@mail.gmail.com> Message-ID: Ciao a tutti! YAPC::EU 2009 si avvicina, se qualcuno volesse presentare qualcosa potrebbe portare alto il vessillo di Roma.pm nel mondo... ed evitare di pagare la partecipazione alla conferenza! Ciao, Flavio. ---------- Forwarded message ---------- From: Jos? Castro Date: Tue, Apr 7, 2009 at 9:22 AM Subject: [pm_groups] YAPC::EU::2009 Call for Presentations To: PM Groups Hi, everyone. Please forward this to your pm groups. YAPC::EU::2009, the 10th edition of the largest European Perl conference, will be held in Lisbon, Portugal, from the 3rd to the 5th of August, 2009. This is the official Call for Presentations and here are the important deadlines: - Deadline for talk proposals: April 30th 2009 - Speaker notification: May 7th 2009 This year's theme for the conference is Corporate Perl. Here's what we're looking for: - We're looking for talks on how corporate companies use Perl and why; - We're looking for talks to fit our beginner's track (if you want to submit one and don't know what about, reach us at organizers at yapceurope2009.org and we'll share with you our preliminary draft of an expected beginner's track); - And, as usual, there is also enough room for talks that don't fit any of those groups, so we'll be looking for and expecting dozens of proposal on everything that is Perl related. We'll be offering two kinds of time-slots for talks: - 20 minutes - 40 minutes If you really need a different time-slot, get in touch with us and we'll see what we can do. Speakers may submit multiple talks. All speakers will have their registration fee waived. - To submit a talk, go to http://yapceurope2009.org/ye2009/newtalk - If you don't have a user yet, please register at http://yapceurope2009.org/ye2009/register For any inquiry, contact us at organizers at yapceurope2009.org, and don't forget to submit your proposals no later than midnight GMT on April 30th, 2009. -- Jos? Castro -- Request pm.org Technical Support via support at pm.org pm_groups mailing list pm_groups at pm.org http://mail.pm.org/mailman/listinfo/pm_groups -------------- next part -------------- An HTML attachment was scrubbed... URL: From kanak at perl.it Tue Apr 21 09:16:51 2009 From: kanak at perl.it (kanak at perl.it) Date: Tue, 21 Apr 2009 18:16:51 +0200 Subject: [Roma.pm] una facile In-Reply-To: <49B94EBC.5030009@gmail.com> References: <49B92D6C.5010005@libero.it> <49B9477F.4050704@libero.it> <49B94EBC.5030009@gmail.com> Message-ID: <5610303433.20090421181651@perl.it> salve devo decidere se impostare una suroutine in modo da ricevere una lista o il riferimento ad una lista. ad esempio: " sub envelope{ my ($env, $rate, $input, ) = @_; my @input = @$input; } " in questo modo la lista glie la devo inviare "per nome" oppure: " sub envelope{ my ($env, $rate, @input, ) = @_; } " in questo modo la lista gliela spedisco tutta nel comando in cui chiamo la sub. io credevo che il primo modo fosse piu' "economico" e facesse risparmiare RAM e CPU (e quindi tempo) .. ma dopo una serie di esperimenti fatti con l'ottimo "time" sinceramente non riesco a vederne la differenza.. diavolo di computers moderni superpotenti! voi che ne pensate? il secondo modo avrebbe il vantaggio di essere semplice da invocare, specialmente con subroutines di subroutines (risparmio il casino delle parentesi quadre) ciao From oha at oha.it Tue Apr 21 09:21:12 2009 From: oha at oha.it (Oha) Date: Tue, 21 Apr 2009 18:21:12 +0200 Subject: [Roma.pm] una facile Message-ID: <200904211621.n3LGLC3t030751@vivaldi08.register.it> > my @input = @$input; qui generi una copia dei dati, quindi tanto vale far che passarli in contesto lista. Oha From kanak at perl.it Tue Apr 21 09:36:49 2009 From: kanak at perl.it (kanak at perl.it) Date: Tue, 21 Apr 2009 18:36:49 +0200 Subject: [Roma.pm] una facile In-Reply-To: <200904211621.n3LGLC3t030751@vivaldi08.register.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> Message-ID: <1816326443.20090421183649@perl.it> ah certo! quindi devo tenere la lista sempre "per nome" nella sub. e se devo percorrerla con un "for" devo continuare a chiamarla per nome: " for$s(0...$#$input){ } " giusto? in questo modo otterrei un allegerimento? gr >> my @input = @$input; > qui generi una copia dei dati, quindi tanto vale far che passarli in contesto lista. > Oha > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma -- Best regards, kanak mailto:kanak at perl.it From oha at oha.it Tue Apr 21 11:35:59 2009 From: oha at oha.it (Oha) Date: Tue, 21 Apr 2009 20:35:59 +0200 Subject: [Roma.pm] una facile Message-ID: <200904211835.n3LIZxN6026732@vivaldi17.register.it> >quindi devo tenere la lista sempre "per nome" nella sub. >e se devo percorrerla con un "for" devo continuare a chiamarla per >nome: >" > for$s(0...$#$input){ > } >" >giusto? >in questo modo otterrei un allegerimento? esatto, un po di consigli pero' $input->[$i] invece di $$input[$i] e $#{$input} invece di $#$input giusto per suggerire uno stile piu' leggibile Oha From kanak at perl.it Tue Apr 21 15:18:40 2009 From: kanak at perl.it (kanak at perl.it) Date: Wed, 22 Apr 2009 00:18:40 +0200 Subject: [Roma.pm] una facile In-Reply-To: <200904211835.n3LIZxN6026732@vivaldi17.register.it> References: <200904211835.n3LIZxN6026732@vivaldi17.register.it> Message-ID: <1521464278.20090422001840@perl.it> grazie $input->>[$i] invece di $$input[$i] > e $#{$input} invece di $#$input > giusto per suggerire uno stile piu' leggibile From dada at perl.it Thu Apr 23 03:24:39 2009 From: dada at perl.it (Aldo Calpini) Date: Thu, 23 Apr 2009 12:24:39 +0200 Subject: [Roma.pm] una facile In-Reply-To: <1816326443.20090421183649@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> Message-ID: <49F041E7.9030005@perl.it> kanak at perl.it wrote: > " > for$s(0...$#$input){ > } > " > giusto? > in questo modo otterrei un allegerimento? in questo modo comunque crei una lista di numeri da 0 alla lunghezza di @input, che per lunghezze sostanziose tanto alleggerimento non e'. suggerisco invece: my $length = $#$input + 1; for(my $s = 0; $s < $length; $s++) { # ... } cheers, Aldo From dakkar at thenautilus.net Thu Apr 23 03:45:03 2009 From: dakkar at thenautilus.net (Gianni Ceccarelli) Date: Thu, 23 Apr 2009 12:45:03 +0200 Subject: [Roma.pm] una facile In-Reply-To: <49F041E7.9030005@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> Message-ID: <20090423124503.4f9b45c4@dechirico> On 2009-04-23 Aldo Calpini wrote: > kanak at perl.it wrote: > > " > > for$s(0...$#$input){ > > } > > " > > giusto? > > in questo modo otterrei un allegerimento? > > in questo modo comunque crei una lista di numeri da 0 alla lunghezza > di @input, che per lunghezze sostanziose tanto alleggerimento non e'. Beh, no. Sono diversi anni che perl non genera davvero la lista, quando usi gli operatori di range in un for. Note per kanak: usa '..', non '...' (sono *quasi* uguali, tranne la volta che li usi in contesto scalare e non succede quel che ti immagini; studia la documentazione (perlop)) > suggerisco invece: Ma perch? for my $elem (@$input) { ... } non va bene? Ovvero, kanak, sei sicuro di aver bisogno dell'indice? -- Dakkar - GPG public key fingerprint = A071 E618 DD2C 5901 9574 6FE2 40EA 9883 7519 3F88 key id = 0x75193F88 The human race is a race of cowards; and I am not only marching in that procession but carrying a banner. -- Mark Twain -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 189 bytes Desc: not available URL: From kanak at perl.it Thu Apr 23 05:52:37 2009 From: kanak at perl.it (kanak at perl.it) Date: Thu, 23 Apr 2009 14:52:37 +0200 Subject: [Roma.pm] una facile In-Reply-To: <49F041E7.9030005@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> Message-ID: <93280423.20090423145237@perl.it> > suggerisco invece: > my $length = $#$input + 1; > for(my $s = 0; $s < $length; $s++) { > # ... > } me lo puoi snodare due secondi plis, pare interessante ma per me e' arrabo. vuoi forse dire che nella parentesi del "for" posso mettere gruppi di comandi invece che liste? per favore non bannatemi dalla mailing list per questo... From kanak at perl.it Thu Apr 23 05:52:52 2009 From: kanak at perl.it (kanak at perl.it) Date: Thu, 23 Apr 2009 14:52:52 +0200 Subject: [Roma.pm] una facile In-Reply-To: <20090423124503.4f9b45c4@dechirico> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <20090423124503.4f9b45c4@dechirico> Message-ID: <6410025736.20090423145252@perl.it> > Note per kanak: usa '..', non '...' (sono *quasi* uguali, tranne la veramente era un errore di battitura.. non sapevo che "..." servisse a qualcosa ahem.. > Ma perch? > for my $elem (@$input) { > ... > } > non va bene? Ovvero, kanak, sei sicuro di aver bisogno dell'indice? in realta' il problema si e' rivelato un falso problema perche' ho notato che il grosso del tempo lo perde a scrivere il file di samples, piu' che a processarli. From polettix at gmail.com Thu Apr 23 09:20:44 2009 From: polettix at gmail.com (Flavio Poletti) Date: Thu, 23 Apr 2009 18:20:44 +0200 Subject: [Roma.pm] una facile In-Reply-To: <6410025736.20090423145252@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <20090423124503.4f9b45c4@dechirico> <6410025736.20090423145252@perl.it> Message-ID: Domandina: ma questi array @input pi? o meno quanti elementi contengono?!? Ciao, Flavio. 2009/4/23 > > Note per kanak: usa '..', non '...' (sono *quasi* uguali, tranne la > > veramente era un errore di battitura.. non sapevo che "..." > servisse a qualcosa ahem.. > > > > > Ma perch? > > > for my $elem (@$input) { > > ... > > } > > > non va bene? Ovvero, kanak, sei sicuro di aver bisogno dell'indice? > > in realta' il problema si e' rivelato un falso problema perche' ho > notato che il grosso del tempo lo perde a scrivere il file di samples, > piu' che a processarli. > > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma > -------------- next part -------------- An HTML attachment was scrubbed... URL: From dada at perl.it Thu Apr 23 09:41:46 2009 From: dada at perl.it (Aldo Calpini) Date: Thu, 23 Apr 2009 18:41:46 +0200 Subject: [Roma.pm] una facile In-Reply-To: References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <20090423124503.4f9b45c4@dechirico> <6410025736.20090423145252@perl.it> Message-ID: <49F09A4A.1000904@perl.it> Flavio Poletti wrote: > Domandina: ma questi array @input pi? o meno quanti elementi contengono?!? trattandosi verosimilmente di audio, direi a occhio e croce 44100 al secondo :-) cheers, Aldo From dada at perl.it Thu Apr 23 09:44:49 2009 From: dada at perl.it (Aldo Calpini) Date: Thu, 23 Apr 2009 18:44:49 +0200 Subject: [Roma.pm] una facile In-Reply-To: <93280423.20090423145237@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <93280423.20090423145237@perl.it> Message-ID: <49F09B01.4020307@perl.it> kanak at perl.it wrote: > me lo puoi snodare due secondi plis, pare interessante ma per me e' > arrabo. > > vuoi forse dire che nella parentesi del "for" posso mettere gruppi di > comandi invece che liste? ni. for ha sostanzialmente due sintassi, quella semplice: for my $iteratore (@lista) { ... } e quella bizantina (presa para para dal linguaggio C): for(inizializzazione; controllo; incremento) { ... } inizializzazione, controllo e incremento possono essere effettivamente gruppi di comandi. il primo viene eseguito solo a inizio ciclo. il secondo viene eseguito ad ogni iterazione e, se ritorna un valore falso, determina la fine del ciclo. il terzo viene eseguito ad ogni iterazione punto e basta. in sostanza, il ciclo for in questo modo e' equivalente a: inizializzazione; while(controllo) { ... incremento; } sembra complicato, ma lo e' :-) la forma piu' consueta per inizializzazione, controllo e incremento e': for(my $i = 0; $i < 10; $i++) { ... } questo esegue il ciclo inizializzando $i a 0, controlla ogni volta che sia minore di 10, e ad ogni ciclo aggiunge uno ad $i. risultato: for my $i (0..9) { ... } le tre parti possono effettivamente essere complicare a piacere, tipo: for(my($i, $j) = (0, 0); rand() > 0.999; $i++, $j--) { ... } questo fa un loop con due variabili, una crescente e una decrescente, che termina quando esce un numero casuale maggiore di 0.999. probabilmente molto di piu' di quanto avresti voluto sapere :-) cheers, Aldo From kanak at perl.it Thu Apr 23 11:27:46 2009 From: kanak at perl.it (kanak at perl.it) Date: Thu, 23 Apr 2009 20:27:46 +0200 Subject: [Roma.pm] una facile In-Reply-To: <49F09B01.4020307@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <93280423.20090423145237@perl.it> <49F09B01.4020307@perl.it> Message-ID: <1277468546.20090423202746@perl.it> > probabilmente molto di piu' di quanto avresti voluto sapere :-) no no mi viene utilissimo questo fatto, grazie. devo studiarmi un po' le implicazioni. tra poco allestisco una pagina con gli output dei suoni fatti dal perl, avrete link e robetta spaghettosa. From kanak at perl.it Fri Apr 24 10:22:40 2009 From: kanak at perl.it (kanak at perl.it) Date: Fri, 24 Apr 2009 19:22:40 +0200 Subject: [Roma.pm] una facile In-Reply-To: <49F09B01.4020307@perl.it> References: <200904211621.n3LGLC3t030751@vivaldi08.register.it> <1816326443.20090421183649@perl.it> <49F041E7.9030005@perl.it> <93280423.20090423145237@perl.it> <49F09B01.4020307@perl.it> Message-ID: <124120170.20090424192240@perl.it> > for(inizializzazione; controllo; incremento) { ... } ed ecco qua che subito mi levi le castagne dal fuoco.. per avere intervalli random entro una certa durata massima, prima avrei dovuto fare meccanismi di 3-4 righe almeno invece ora: for(my $sec = 0; $sec < $durata; $sec+=1/(2**(d(3)-1))) { $dur=$sec-$oldsec; push @ritb, emp($dur, kick()); $oldsec=$sec; } mi fa delle "note" da 1/4, 1/2 o 1 secondo a caso.. finche' non finisce la durata del pezzo! PS "d" e' la mia sub preferita: sub d{ my $dado = shift; return int rand($dado)+1; } From oha at oha.it Fri Apr 24 15:36:21 2009 From: oha at oha.it (Oha) Date: Sat, 25 Apr 2009 00:36:21 +0200 Subject: [Roma.pm] una facile Message-ID: <200904242236.n3OMaLjf000534@vivaldi30.register.it> >"d" e' la mia sub preferita: > >sub d{ > my $dado = shift; > return int rand($dado)+1; >} ne approfittiamo? sub d($) { return 1 + int rand shift; } ha il vantaggio che puoi chiamarla senza parentesi: my $roll = d 20 + d 8; Oha From kanak at perl.it Fri Apr 24 16:07:55 2009 From: kanak at perl.it (kanak at perl.it) Date: Sat, 25 Apr 2009 01:07:55 +0200 Subject: [Roma.pm] una facile In-Reply-To: <200904242236.n3OMaLjf000534@vivaldi30.register.it> References: <200904242236.n3OMaLjf000534@vivaldi30.register.it> Message-ID: <1128494842.20090425010755@perl.it> gajardo! ma vale per tute le subs? > sub d($) { return 1 + int rand shift; } > ha il vantaggio che puoi chiamarla senza parentesi: > my $roll = d 20 + d 8; > Oha -- Best regards, kanak mailto:kanak at perl.it From oha at oha.it Sat Apr 25 01:53:05 2009 From: oha at oha.it (Oha) Date: Sat, 25 Apr 2009 10:53:05 +0200 Subject: [Roma.pm] una facile Message-ID: <200904250853.n3P8r5QL024208@vivaldi20.register.it> >gajardo! >ma vale per tute le subs? l'uso dei "prototypes" e' documentato in perlsub e' la ragione per la quale puoi scrivere @desc = sort { $b <=> $a } @list push @list, 1,2; invece di @desc = sort(sub { $b <=> $a; }, @list); push(@list, 1,2); From webmaster.staff at gmail.com Wed Apr 29 07:47:33 2009 From: webmaster.staff at gmail.com (LordOfDeath) Date: Wed, 29 Apr 2009 16:47:33 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <200904250853.n3P8r5QL024208@vivaldi20.register.it> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> Message-ID: <49F86885.5030604@gmail.com> Salve a tutti ragazzi! volevo porvi un problema che mi si ? creato...! my $test= IO::Socket::INET->new(PeerAddr=>"qualcheip",PeerPort=>"80",Proto=>"tcp", Timeout=>3); $test->autoflush(1); my $result; my $p; print $test 'POST /test.html HTTP/1.1' ."\r\n"; print $test 'Host: '."qualcheip"."\r\n"; print $tes t'User-Agent: veryprivateacsor' ."\r\n"; print $test 'Accept: text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5' ."\r\n"; print $test 'Accept-Language: en-us,en;q=0.5' ."\r\n"; print $test 'Accept-Encoding: gzip,deflate' ."\r\n"; print $test 'Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7' ."\r\n"; print $test 'Keep-Alive: 300' ."\r\n"; print $test 'Connection: keep-alive' ."\r\n"; print $test 'Content-Type: multipart/form-data; ' ."\r\n"; print $test 'boundary=---------------------------41184676334' ."\r\n"; print $test 'Content-Length: 234' ."\r\n"; print $test '' ."\r\n"; print $test '-----------------------------41184676334' ."\r\n"; print $test 'Content-Disposition: form-data; name="config.x"' ."\r\n"; print $test '' ."\r\n"; print $test '' ."\r\n"; print $test '-----------------------------41184676334' ."\r\n"; print $test 'Content-Disposition: form-data; name="config.y"' ."\r\n"; print $test '' ."\r\n"; print $test '' ."\r\n"; print $test '-----------------------------41184676334--' ."\r\n"; print $test ' ' ."\r\n"; print "vai col while\n"; while($line=<$test>){ $result.=$line; print $result; } close ($hack); avendo queste righe di codice in una sub, ogni tanto mi succede questo: la socket rimane in attesa di un'eventuale risposta dell'ip che per? nn arriva, e la sessione non cade in timeout, quindi rimango ad aspettare... per mooooolto tempo! e non capisco il motivo.. per cui mi chiedevo se c'? un modo per prendere il l'output da una socket dopo uno sleep di qualche secondo... ? un modo 1 p? grezzo, per? altrimenti mi si inchioda tutto! grazie in anticipo :) From webmaster.staff at gmail.com Wed Apr 29 07:51:11 2009 From: webmaster.staff at gmail.com (LordOfDeath) Date: Wed, 29 Apr 2009 16:51:11 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <49F86885.5030604@gmail.com> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> Message-ID: <49F8695F.5020007@gmail.com> LordOfDeath ha scritto: > Salve a tutti ragazzi! > volevo porvi un problema che mi si ? creato...! > > my $test= > IO::Socket::INET->new(PeerAddr=>"qualcheip",PeerPort=>"80",Proto=>"tcp", > Timeout=>3); > $test->autoflush(1); > my $result; > my $p; > print $test 'POST /test.html HTTP/1.1' ."\r\n"; > print $test 'Host: '."qualcheip"."\r\n"; > print $tes t'User-Agent: veryprivateacsor' ."\r\n"; > print $test 'Accept: > text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5' > ."\r\n"; > print $test 'Accept-Language: en-us,en;q=0.5' ."\r\n"; > print $test 'Accept-Encoding: gzip,deflate' ."\r\n"; > print $test 'Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7' ."\r\n"; > print $test 'Keep-Alive: 300' ."\r\n"; > print $test 'Connection: keep-alive' ."\r\n"; > print $test 'Content-Type: multipart/form-data; ' ."\r\n"; > print $test 'boundary=---------------------------41184676334' ."\r\n"; > print $test 'Content-Length: 234' ."\r\n"; > print $test '' ."\r\n"; > print $test '-----------------------------41184676334' ."\r\n"; > print $test 'Content-Disposition: form-data; name="config.x"' ."\r\n"; > print $test '' ."\r\n"; > print $test '' ."\r\n"; > print $test '-----------------------------41184676334' ."\r\n"; > print $test 'Content-Disposition: form-data; name="config.y"' ."\r\n"; > print $test '' ."\r\n"; > print $test '' ."\r\n"; > print $test '-----------------------------41184676334--' ."\r\n"; > print $test ' ' ."\r\n"; > print "vai col while\n"; > > > while($line=<$test>){ > $result.=$line; > print $result; > } > > close ($hack); > > > avendo queste righe di codice in una sub, ogni tanto mi succede > questo: la socket rimane in attesa di un'eventuale risposta dell'ip > che per? nn arriva, e la sessione non cade in timeout, quindi rimango > ad aspettare... per mooooolto tempo! e non capisco il motivo.. per cui > mi chiedevo se c'? un modo per prendere il l'output da una socket dopo > uno sleep di qualche secondo... ? un modo 1 p? grezzo, per? altrimenti > mi si inchioda tutto! > > grazie in anticipo :) > > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma > p.s. ora che ho postato il code ho sbagliato a trascrivere qualcosina, al posto di close($hack) ? close($test); :) From dakkar at thenautilus.net Wed Apr 29 07:53:51 2009 From: dakkar at thenautilus.net (Gianni Ceccarelli) Date: Wed, 29 Apr 2009 16:53:51 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <49F86885.5030604@gmail.com> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> Message-ID: <20090429165351.49a8cd15@dechirico> 1) per creare un nuovo messaggio di posta, *non* usare il tasto "reply" 2) per parlare HTTP, usa LWP o WWW::Mechanize -- Dakkar - GPG public key fingerprint = A071 E618 DD2C 5901 9574 6FE2 40EA 9883 7519 3F88 key id = 0x75193F88 Adding features does not necessarily increase functionality -- it just makes the manuals thicker. -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 190 bytes Desc: not available URL: From webmaster.staff at gmail.com Wed Apr 29 07:57:07 2009 From: webmaster.staff at gmail.com (LordOfDeath) Date: Wed, 29 Apr 2009 16:57:07 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <20090429165351.49a8cd15@dechirico> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> <20090429165351.49a8cd15@dechirico> Message-ID: <49F86AC3.2080901@gmail.com> Gianni Ceccarelli ha scritto: > 1) per creare un nuovo messaggio di posta, *non* usare il tasto > "reply" > sorry :$ > 2) per parlare HTTP, usa LWP o WWW::Mechanize > il problema ? che ho bisogno di IO::Socket, perch? non posso usare altri moduli (non sono installati sulla macchina, e non posso installarli), ma il problema non ? questo.. il problema ? che anche se fosse diversa la richiesta, il problema persiste... come posso leggere dal socket e uscire dopo tot secondi dalla connessione (anche in caso non abbia scritto niente il server?) > > ------------------------------------------------------------------------ > > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma thx :) From dakkar at thenautilus.net Wed Apr 29 08:00:37 2009 From: dakkar at thenautilus.net (Gianni Ceccarelli) Date: Wed, 29 Apr 2009 17:00:37 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <49F86AC3.2080901@gmail.com> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> <20090429165351.49a8cd15@dechirico> <49F86AC3.2080901@gmail.com> Message-ID: <20090429170037.56b18632@dechirico> On 2009-04-29 LordOfDeath wrote: > il problema ? che ho bisogno di IO::Socket, perch? non posso usare > altri moduli (non sono installati sulla macchina, e non posso > installarli) Hmm. Studia Module::Install::Bundle e local::lib, potrebbero aiutarti molto. Curiosit?: che razza di ambiente ?, dove non puoi copiarci dei file? > ma il problema non ? questo.. il problema ? che anche > se fosse diversa la richiesta, il problema persiste... > come posso leggere dal socket e uscire dopo tot secondi dalla > connessione (anche in caso non abbia scritto niente il server?) suggerisco perldoc -f select (la forma a 4 argomenti) -- Dakkar - GPG public key fingerprint = A071 E618 DD2C 5901 9574 6FE2 40EA 9883 7519 3F88 key id = 0x75193F88 There are more things in heaven and earth, Horatio, than are dreamt of in your philosophy. -- Wm. Shakespeare, "Hamlet" -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 190 bytes Desc: not available URL: From webmaster.staff at gmail.com Wed Apr 29 08:09:10 2009 From: webmaster.staff at gmail.com (LordOfDeath) Date: Wed, 29 Apr 2009 17:09:10 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <20090429170037.56b18632@dechirico> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> <20090429165351.49a8cd15@dechirico> <49F86AC3.2080901@gmail.com> <20090429170037.56b18632@dechirico> Message-ID: <49F86D96.3020203@gmail.com> Gianni Ceccarelli ha scritto: > On 2009-04-29 LordOfDeath wrote: > >> il problema ? che ho bisogno di IO::Socket, perch? non posso usare >> altri moduli (non sono installati sulla macchina, e non posso >> installarli) >> > > Hmm. Studia Module::Install::Bundle e local::lib, potrebbero aiutarti > molto. > > li conosco, ma posso usare pochissimi moduli :(, e preferirei tenere tutto in un file unico > Curiosit?: che razza di ambiente ?, dove non puoi copiarci dei file? > ? un account shell di un mio amico, che tiene pochissimi moduli basilari (lwp e http non c'erano!) > >> ma il problema non ? questo.. il problema ? che anche >> se fosse diversa la richiesta, il problema persiste... >> come posso leggere dal socket e uscire dopo tot secondi dalla >> connessione (anche in caso non abbia scritto niente il server?) >> > > suggerisco perldoc -f select (la forma a 4 argomenti) > > > ------------------------------------------------------------------------ > > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma ho letto il perldoc di select con la forma a 4 argomenti, ovvero select($rout=$rin, $wout=$win, $eout=$ein, 1); ma sinceramente non s? come utilizzarla...! io ho provato con $rin = $win = $ein = ''; vec($rin,fileno(STDIN),1) = 1; vec($win,fileno(STDOUT),1) = 1; $ein = $rin | $win; select($rout=$rin, $wout=$win, $eout=$ein, 1); prima del while... per?... da dove leggo l'output dopo? (scusa l'ignoranza ma non ho mai dovuto fare una cosa del genere) From dakkar at thenautilus.net Wed Apr 29 08:14:07 2009 From: dakkar at thenautilus.net (Gianni Ceccarelli) Date: Wed, 29 Apr 2009 17:14:07 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <49F86D96.3020203@gmail.com> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> <20090429165351.49a8cd15@dechirico> <49F86AC3.2080901@gmail.com> <20090429170037.56b18632@dechirico> <49F86D96.3020203@gmail.com> Message-ID: <20090429171407.44991bfd@dechirico> On 2009-04-29 LordOfDeath wrote: > li conosco, ma posso usare pochissimi moduli :(, e preferirei tenere > tutto in un file unico il tuo "preferirei" io lo traduco un "sono masochista" :) > ? un account shell di un mio amico, che tiene pochissimi moduli > basilari (lwp e http non c'erano!) E non ? proprio pensabile copiarci qualche file? mica li devi mettere a nome di altri utenti, o nelle directory di sistema! > ho letto il perldoc di select con la forma a 4 argomenti, ovvero > select($rout=$rin, $wout=$win, $eout=$ein, 1); > ma sinceramente non so come utilizzarla...! Eh, non ho la forza di mettermi a riassumerti un intero corso di programmazione UNIX. Cerca qualche esempio, magari in C, o leggi almeno la documentazione di IO::Select -- Dakkar - GPG public key fingerprint = A071 E618 DD2C 5901 9574 6FE2 40EA 9883 7519 3F88 key id = 0x75193F88 Your love life will be... interesting. -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 190 bytes Desc: not available URL: From webmaster.staff at gmail.com Wed Apr 29 08:17:01 2009 From: webmaster.staff at gmail.com (LordOfDeath) Date: Wed, 29 Apr 2009 17:17:01 +0200 Subject: [Roma.pm] un piccolo problemino! In-Reply-To: <20090429171407.44991bfd@dechirico> References: <200904250853.n3P8r5QL024208@vivaldi20.register.it> <49F86885.5030604@gmail.com> <20090429165351.49a8cd15@dechirico> <49F86AC3.2080901@gmail.com> <20090429170037.56b18632@dechirico> <49F86D96.3020203@gmail.com> <20090429171407.44991bfd@dechirico> Message-ID: <49F86F6D.4040609@gmail.com> Gianni Ceccarelli ha scritto: > On 2009-04-29 LordOfDeath wrote: > >> li conosco, ma posso usare pochissimi moduli :(, e preferirei tenere >> tutto in un file unico >> > > il tuo "preferirei" io lo traduco un "sono masochista" :) > non ? da escludere :D > >> ? un account shell di un mio amico, che tiene pochissimi moduli >> basilari (lwp e http non c'erano!) >> > > E non ? proprio pensabile copiarci qualche file? mica li devi mettere > a nome di altri utenti, o nelle directory di sistema! > > >> ho letto il perldoc di select con la forma a 4 argomenti, ovvero >> select($rout=$rin, $wout=$win, $eout=$ein, 1); >> ma sinceramente non so come utilizzarla...! >> > > Eh, non ho la forza di mettermi a riassumerti un intero corso di > programmazione UNIX. > > Cerca qualche esempio, magari in C, o leggi almeno la documentazione > di IO::Select > > > ------------------------------------------------------------------------ > > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma ok... comunque penso di aver risolto per vie traverse: faccio un fork del processo, che caccia tutto in un file di testo, dopo tot secondi killo il pid e leggo il contenuto del testo! :) grazie comunque :)) saluti! From oha at oha.it Wed Apr 29 08:58:12 2009 From: oha at oha.it (Oha) Date: Wed, 29 Apr 2009 17:58:12 +0200 Subject: [Roma.pm] un piccolo problemino! Message-ID: <200904291558.n3TFwD5M028518@vivaldi25.register.it> > faccio un fork del processo, che caccia tutto in un file di testo, >dopo tot secondi killo il pid e leggo il contenuto del testo! :) se select non ti piace, vedi IO::Select come ti suggeriva Dakkar in ogni caso, puoi sempre usare SIG_ALRM invece di fork + kill (che tanto poi devi controllare SIG_CHLD) Oha