From kanak at perl.it Tue Feb 5 03:09:39 2008 From: kanak at perl.it (kanak at perl.it) Date: Tue, 5 Feb 2008 12:09:39 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> Message-ID: <911180828.20080205120939@perl.it> qual'e' l'omologo di sprintf "%b", $numero? come hex($numero) e' l'omologo di sprintf "%x", $numero. per dirla piu' chiara: ce' una funzione che ti dice quaanto vale un numero binario? thx (prima che mi metta a fare un'inutile e quantomai pelosissima sub) From ludan81 at gmail.com Tue Feb 5 03:28:43 2008 From: ludan81 at gmail.com (Daniele Ludovici) Date: Tue, 5 Feb 2008 12:28:43 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <911180828.20080205120939@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> Message-ID: <20080205112843.GA23779@asen.et.tudelft.nl> On Tue, Feb 05, 2008 at 12:09:39PM +0100, kanak at perl.it wrote: > qual'e' l'omologo di > sprintf "%b", $numero? > > come hex($numero) > e' l'omologo di > sprintf "%x", $numero. > > per dirla piu' chiara: > ce' una funzione che ti dice quaanto vale un numero binario? > > thx > > (prima che mi metta a fare un'inutile e quantomai pelosissima sub) > $decimal = ord(pack('B8', '10110110'));' -- Daniele From dada at perl.it Tue Feb 5 03:30:36 2008 From: dada at perl.it (Aldo Calpini) Date: Tue, 05 Feb 2008 12:30:36 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <911180828.20080205120939@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> Message-ID: <47A848DC.3050804@perl.it> kanak at perl.it wrote: > per dirla piu' chiara: > ce' una funzione che ti dice quaanto vale un numero binario? > non c'e' una funzione propriamente detta, ma la documentazione riporta il seguente accrocco: unpack("N", pack("B32", substr("0" x 32 . $numero, -32))) che si puo' tradurre in una sub, per quanto non priva di peluria: sub bintodec { unpack("N", pack("B32", substr("0" x 32 . shift, -32))); } # esempio: my $risposta = bintodec("101010"); ovviamente vale solo per numeri fino a 4.294.967.295 (ossia 32 bit). cheers, Aldo From dada at perl.it Tue Feb 5 03:35:19 2008 From: dada at perl.it (Aldo Calpini) Date: Tue, 05 Feb 2008 12:35:19 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <20080205112843.GA23779@asen.et.tudelft.nl> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <20080205112843.GA23779@asen.et.tudelft.nl> Message-ID: <47A849F7.9020104@perl.it> Daniele Ludovici wrote: > $decimal = ord(pack('B8', '10110110'));' > ...che invece vale solo per numeri fino a 255. non mi sembra un degno omologo di hex(). cheers, Aldo From kanak at perl.it Tue Feb 5 09:31:43 2008 From: kanak at perl.it (kanak at perl.it) Date: Tue, 5 Feb 2008 18:31:43 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A848DC.3050804@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A848DC.3050804@perl.it> Message-ID: <989956578.20080205183143@perl.it> > kanak at perl.it wrote: >> per dirla piu' chiara: >> ce' una funzione che ti dice quaanto vale un numero binario? >> > non c'e' una funzione propriamente detta, ma la documentazione riporta > il seguente accrocco: > unpack("N", pack("B32", substr("0" x 32 . $numero, -32))) ragazzi un vero accroccone! comunque grazie. aldo ma tu posti da oltr'alpe? From ema_zep at libero.it Wed Feb 6 04:18:20 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 13:18:20 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <911180828.20080205120939@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> Message-ID: <47A9A58C.4010607@libero.it> kanak at perl.it wrote: > qual'e' l'omologo di > sprintf "%b", $numero? > > come hex($numero) > e' l'omologo di > sprintf "%x", $numero. > > per dirla piu' chiara: > ce' una funzione che ti dice quaanto vale un numero binario? Sul piano della semplicit? d'uso, forse la soluzione migliore ? data dal pragma bignum (il modulo bignum ? probabilmente gi? incluso nella tua distribuzione, per cui non devi neanche installarlo): use bignum; my $bin = 0b1100011111; my $dec = $bin->as_int; # 799 (Ricordati solo che i valori binari devono avere "0b" iniziale.) Addirittura puoi applicare i metodi direttamente ai valori letterali, come se fossero first-class objects (potenza del constant overloading): print 799->as_bin; # stampa 0b1100011111 print 0b1100011111->as_int; # stampa 799 Per giunta non hai neanche limitazioni sulla dimensione dei numeri/stringhe. Ciao, Emanuele. From dada at perl.it Wed Feb 6 05:06:58 2008 From: dada at perl.it (Aldo Calpini) Date: Wed, 06 Feb 2008 14:06:58 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9A58C.4010607@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> Message-ID: <47A9B0F2.8000105@perl.it> Emanuele Zeppieri wrote: > Sul piano della semplicit? d'uso, forse la soluzione migliore ? data dal > pragma bignum (il modulo bignum ? probabilmente gi? incluso nella tua > distribuzione, per cui non devi neanche installarlo): > eh, ma questo funziona solo nel caso in cui il valore da convertire sia una costante programmata duramente[1] nel codice. supponendo di partire da una rappresentazione (stringa) del binario in una variabile, si potrebbe proporre lo sporco trucco: $dec = eval "0b$bin"; (che non necessita nemmeno del pragma bignum). la notazione "0b", devo ammettere, mi era del tutto sconosciuta fino a qualche minuto fa! grazie Emanuele :-) cheers, Aldo [1] "hardcoded" , per chi non l'avesse capita From dada at perl.it Wed Feb 6 05:20:47 2008 From: dada at perl.it (Aldo Calpini) Date: Wed, 06 Feb 2008 14:20:47 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <989956578.20080205183143@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A848DC.3050804@perl.it> <989956578.20080205183143@perl.it> Message-ID: <47A9B42F.2080802@perl.it> kanak at perl.it wrote: > aldo ma tu posti da oltr'alpe? > jawohl! ormai qui sono solo una voce, un alieno, un extracomunitario, un ospite da piu' di tre giorni. faccio a tutti gli effetti parte di [BV]ie(nna|r).pm. che non e' male, eh... certo pero'... Porchetta.pm era un'altra cosa :-( cheers, Aldo From ema_zep at libero.it Wed Feb 6 06:48:47 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 15:48:47 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9B0F2.8000105@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> Message-ID: <47A9C8CF.2000005@libero.it> Aldo Calpini wrote: > Emanuele Zeppieri wrote: >> Sul piano della semplicit? d'uso, forse la soluzione migliore ? data dal >> pragma bignum (il modulo bignum ? probabilmente gi? incluso nella tua >> distribuzione, per cui non devi neanche installarlo): >> > > eh, ma questo funziona solo nel caso in cui il valore da convertire sia > una costante programmata duramente[1] nel codice. Questo ? vero, ma c'? un trucco semplicissimo: basta sommare 0 (o moltiplicare per 1) la tua variabile con valore alieno e il risultato diventa automagicamente un oggetto Math::BigInt (perch? dietro le quinte interviene anche l'overloading degli operatori): $dec = ($bin_from_outside + 0)->as_int; # et-voil? ;-) (Sempre che si voglia proprio insistere con bignum anzich? usare direttamente Math::BigInt). > supponendo di partire > da una rappresentazione (stringa) del binario in una variabile, si > potrebbe proporre lo sporco trucco: > > $dec = eval "0b$bin"; Soffre della limitazione sulla dimensione dei numeri (che bignum non ha) ma ? veramente bello! ;-) Ciao, Emanuele. From ema_zep at libero.it Wed Feb 6 07:18:02 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 16:18:02 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9C8CF.2000005@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> Message-ID: <47A9CFAA.9040202@libero.it> Emanuele Zeppieri wrote: > > $dec = ($bin_from_outside + 0)->as_int; # et-voil? ;-) > Anzi, se vogliamo solo la conversione binario->decimale, ? ancora pi? semplice (!): $dec = $bin + 0; Che funziona con e *senza* bignum (in quest'ultimo caso perdiamo la precisione infinita). ;-) -Emanuele From balestra at cesmail.net Wed Feb 6 07:27:04 2008 From: balestra at cesmail.net (Marco Balestra) Date: Wed, 6 Feb 2008 16:27:04 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9B0F2.8000105@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> Message-ID: <2A392CAC-9D03-465D-AA49-3A9A42CE02A5@cesmail.net> On 06/feb/08, at 14:06, Aldo Calpini wrote: > (che non necessita nemmeno del pragma bignum). la notazione "0b", devo > ammettere, mi era del tutto sconosciuta fino a qualche minuto fa! > grazie > Emanuele :-) Appoggio in pieno... bella scoperta :-) -- Marco Balestra IT consultant balestra at cesmail.net From ema_zep at libero.it Wed Feb 6 08:08:02 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 17:08:02 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9CFAA.9040202@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> Message-ID: <47A9DB62.6090400@libero.it> Emanuele Zeppieri wrote: > $dec = $bin + 0; > > Che funziona con e *senza* bignum Precisazione: *senza* bignum non funzionerebbe se $bin fosse stato inizializzato con una stringa (anche con lo "0b" iniziale): $bin deve contenere un numero (binario). (La numificazione automatica di Perl funziona solo per rappresentazioni decimali). E senza bignum "+ 0" non serve a niente ;-) Rimane invece confermato che con bignum funziona sempre, anche nel caso di stringhe, anche di lunghezza arbitraria. -Emanuele From kanak at perl.it Wed Feb 6 08:02:04 2008 From: kanak at perl.it (kanak at perl.it) Date: Wed, 6 Feb 2008 17:02:04 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9CFAA.9040202@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> Message-ID: <835568445.20080206170204@perl.it> scusate la rozzezza ma: print 0b100 scrive 4 quindi e' fatta? >> >> $dec = ($bin_from_outside + 0)->as_int; # et-voil? ;-) >> > Anzi, se vogliamo solo la conversione binario->decimale, ? ancora pi? > semplice (!): > $dec = $bin + 0; > Che funziona con e *senza* bignum (in quest'ultimo caso perdiamo la > precisione infinita). > ;-) > -Emanuele > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma -- Best regards, kanak mailto:kanak at perl.it From ema_zep at libero.it Wed Feb 6 08:06:48 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 17:06:48 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <835568445.20080206170204@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> Message-ID: <47A9DB18.9090702@libero.it> kanak at perl.it wrote: > scusate la rozzezza ma: > > print 0b100 > > scrive 4 > > quindi e' fatta? Se vuoi solo conversioni binario->decimale, se i tuoi valori sono sempre noti a design time e se non vuoi la lunghezza arbitraria, ? fatta ;-) From kanak at perl.it Wed Feb 6 09:43:29 2008 From: kanak at perl.it (kanak at perl.it) Date: Wed, 6 Feb 2008 18:43:29 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9DB18.9090702@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> Message-ID: <63028486.20080206184329@perl.it> >> scusate la rozzezza ma: >> print 0b100 >> scrive 4 >> quindi e' fatta? > Se vuoi solo conversioni binario->decimale, se i tuoi valori sono sempre > noti a design time e se non vuoi la lunghezza arbitraria, ? fatta ;-) quindi uno prima prova cosi' in caso nei modi che dicevate prima. prima aggiungendo +0 eccetera.. > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma -- Best regards, kanak mailto:kanak at perl.it From ema_zep at libero.it Wed Feb 6 10:24:05 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 19:24:05 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <63028486.20080206184329@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> Message-ID: <47A9FB45.1000102@libero.it> kanak at perl.it wrote: >>> scusate la rozzezza ma: >>> print 0b100 >>> scrive 4 >>> quindi e' fatta? > Emanuele Zeppieri wrote: >> Se vuoi solo conversioni binario->decimale, se i tuoi valori sono sempre >> noti a design time e se non vuoi la lunghezza arbitraria, ? fatta ;-) > quindi uno prima prova cosi' in caso nei modi che dicevate prima. > > prima aggiungendo +0 > > eccetera.. S?, vai tranquillo. Quello che serve a te ? probabilmente soltanto print 0b100; Con bignum puoi convertire numeri arbitrariamente grandi: use bignum; my $bin = '0b11111111111111111111101010101010101010101010101010101010101010101'; print $bin + 0; # 36893476419295073621 (anche noti solo a runtime) ma se non hai quest'esigenza ? perfettamente inutile. -Emanuele From ludan81 at gmail.com Wed Feb 6 10:30:40 2008 From: ludan81 at gmail.com (Daniele Ludovici) Date: Wed, 6 Feb 2008 19:30:40 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9FB45.1000102@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> Message-ID: <20080206183040.GB5244@asen.et.tudelft.nl> On Wed, Feb 06, 2008 at 07:24:05PM +0100, Emanuele Zeppieri wrote: > > Con bignum puoi convertire numeri arbitrariamente grandi: > > use bignum; > my $bin > = '0b11111111111111111111101010101010101010101010101010101010101010101'; > print $bin + 0; # 36893476419295073621 > Ormai ci siamo, emazep mi hai stuzzicato troppo e io ora stuzzico te con una domanda forse stupida ma che (conoscendoti un po') generera' un commento interessante. Scrivilo se e solo quando ne avrai voglia: bigint o Math::BigInt, come, dove e in base a cosa scegliere? Cheers :-) -- Daniele From flavio at polettix.it Wed Feb 6 11:02:14 2008 From: flavio at polettix.it (Flavio Poletti) Date: Wed, 6 Feb 2008 20:02:14 +0100 (CET) Subject: [Roma.pm] - perfunc In-Reply-To: <20080206183040.GB5244@asen.et.tudelft.nl> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> Message-ID: <51440.129.192.97.6.1202324534.squirrel@upmail.polettix.it> ludan++ (anche se mi stai facendo il larsen della situazione!) PS: so che larsen legge questa mailing list :) > On Wed, Feb 06, 2008 at 07:24:05PM +0100, Emanuele Zeppieri wrote: >> >> Con bignum puoi convertire numeri arbitrariamente grandi: >> >> use bignum; >> my $bin >> = '0b11111111111111111111101010101010101010101010101010101010101010101'; >> print $bin + 0; # 36893476419295073621 >> > > Ormai ci siamo, emazep mi hai stuzzicato troppo e io ora stuzzico te con > una domanda forse stupida ma che (conoscendoti un po') generera' un > commento interessante. Scrivilo se e solo quando ne avrai voglia: > > bigint o Math::BigInt, come, dove e in base a cosa scegliere? > > Cheers :-) > -- > Daniele > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma > From ema_zep at libero.it Wed Feb 6 11:41:32 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 20:41:32 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <20080206183040.GB5244@asen.et.tudelft.nl> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> Message-ID: <47AA0D6C.3070102@libero.it> Daniele Ludovici wrote: > Ormai ci siamo, emazep mi hai stuzzicato troppo e io ora stuzzico te con > una domanda forse stupida ma che (conoscendoti un po') generera' un > commento interessante. Scrivilo se e solo quando ne avrai voglia: > > bigint o Math::BigInt, come, dove e in base a cosa scegliere? Allora, non c'? grande differenza, perch? bignum ? semplicemente un frontend per Math::BigInt che, sfruttando l'overloading delle costanti (su cui c'? un bell'articolo su perl.it ;-) trasforma ogni valore letterale (numificabile) incontrato nel codice in un oggetto Math::BigInt. Quindi bigint pu? tornare comodo se devi lavorare su valori letterali (o comunque se parti da quelli, perch? le altre variabili coinvolte nelle espressioni vengono comunque contaminate e diventano oggetti Math::BigInt anch'esse - grazie all'overloading degli operatori). Insomma bigint rende le cose pi? trasparenti. La differenza ? sostanzialmente scrivere questo: use Math::BigInt; my $str = ; my $x = Math::BigInt->new($str); # $x ? ora un oggetto Math::BigInt; oppure questo: use bigint; my $x = ; # $x ? ora lo stesso un oggetto # Math::BigInt; Ecco, nel caso sollevato da Aldo (valori noti solo a runtime) se usi direttamente Math::BigInt non sei costretto a ricorrere al trucco di sommargli zero, che obiettivamente non ? il massimo dell'eleganza. Ciao, Emanuele. From ema_zep at libero.it Wed Feb 6 12:33:50 2008 From: ema_zep at libero.it (Emanuele Zeppieri) Date: Wed, 06 Feb 2008 21:33:50 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47AA0D6C.3070102@libero.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> <47AA0D6C.3070102@libero.it> Message-ID: <47AA19AE.9090303@libero.it> Emanuele Zeppieri wrote: > Quindi bigint pu? tornare comodo se devi lavorare su valori letterali (o > comunque se parti da quelli, perch? le altre variabili coinvolte nelle > espressioni vengono comunque contaminate e diventano oggetti > Math::BigInt anch'esse - grazie all'overloading degli operatori). Per essere pi? precisi, le variabili /contaminate/ sono ovviamente quelle a cui vengono assegnati *i risultati* delle espressioni. (Avviene quando, detto pi? precisamente anche questo, l'espressione contiene almeno un operando che ? un oggetto Math::BigInt). From ludan81 at gmail.com Wed Feb 6 13:16:37 2008 From: ludan81 at gmail.com (Daniele Ludovici) Date: Wed, 6 Feb 2008 22:16:37 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47AA19AE.9090303@libero.it> References: <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> <47AA0D6C.3070102@libero.it> <47AA19AE.9090303@libero.it> Message-ID: <20080206211637.GA8614@asen.et.tudelft.nl> On Wed, Feb 06, 2008 at 09:33:50PM +0100, Emanuele Zeppieri wrote: > Emanuele Zeppieri wrote: > > > Quindi bigint pu? tornare comodo se devi lavorare su valori letterali (o > > comunque se parti da quelli, perch? le altre variabili coinvolte nelle > > espressioni vengono comunque contaminate e diventano oggetti > > Math::BigInt anch'esse - grazie all'overloading degli operatori). > > Per essere pi? precisi, le variabili /contaminate/ sono ovviamente > quelle a cui vengono assegnati *i risultati* delle espressioni. > > (Avviene quando, detto pi? precisamente anche questo, l'espressione > contiene almeno un operando che ? un oggetto Math::BigInt). > boha: emazep++ grazie mille! Cheers -- Daniele From larsen at perl.it Thu Feb 7 06:04:26 2008 From: larsen at perl.it (Stefano Rodighiero) Date: Thu, 7 Feb 2008 15:04:26 +0100 Subject: [Roma.pm] [Pelr.it/Articolo] Dati di classe in Perl Message-ID: <699026fb0802070604s477ff2c4q830762a7160ca97d@mail.gmail.com> """ Probabilmente, una delle cose pi? sorprendenti per chi proviene da altri linguaggi ? la incredibile variet? di approcci all'object orientation che offre il Perl. Come se non bastassero la libert? e flessibilit? offerte dal linguaggio nel 'fai da te', esistono le soluzioni preconfezionate su CPAN, dalle pi? leggere e semplici a quelle pi? estese e complesse, dai metamodelli e class class generators (MOP, Moose) all'implementazione del Design By Contract (Class::Contract). Anche per un perlista esperto, il numero di moduli dedicati all'OO su CPAN ? qualcosa che lascia disorientati. """ di Giacomo Cerrai From larsen at perl.it Thu Feb 7 07:04:41 2008 From: larsen at perl.it (Stefano Rodighiero) Date: Thu, 7 Feb 2008 16:04:41 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <51440.129.192.97.6.1202324534.squirrel@upmail.polettix.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> <51440.129.192.97.6.1202324534.squirrel@upmail.polettix.it> Message-ID: <699026fb0802070704w73628335n529f033a60002f06@mail.gmail.com> 2008/2/6 Flavio Poletti : > ludan++ (anche se mi stai facendo il larsen della situazione!) Perch?, gli etologi cosa dicono dei larsen della situazione ? :) S. From flavio at polettix.it Thu Feb 7 09:18:43 2008 From: flavio at polettix.it (Flavio Poletti) Date: Thu, 7 Feb 2008 18:18:43 +0100 (CET) Subject: [Roma.pm] - perfunc In-Reply-To: <699026fb0802070704w73628335n529f033a60002f06@mail.gmail.com> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <47A9B0F2.8000105@perl.it> <47A9C8CF.2000005@libero.it> <47A9CFAA.9040202@libero.it> <835568445.20080206170204@perl.it> <47A9DB18.9090702@libero.it> <63028486.20080206184329@perl.it> <47A9FB45.1000102@libero.it> <20080206183040.GB5244@asen.et.tudelft.nl> <51440.129.192.97.6.1202324534.squirrel@upmail.polettix.it> <699026fb0802070704w73628335n529f033a60002f06@mail.gmail.com> Message-ID: <39111.194.237.142.7.1202404723.squirrel@upmail.polettix.it> Casomai gli eNologi... Dicono che il larsen della situazione suole fare domande tipo "di questa cosa non ne so una cippa, perch? non approfondisci?" :D > 2008/2/6 Flavio Poletti : > >> ludan++ (anche se mi stai facendo il larsen della situazione!) > > Perch?, gli etologi cosa dicono dei larsen della situazione ? :) > > S. > _______________________________________________ > Roma mailing list > Roma at pm.org > http://mail.pm.org/mailman/listinfo/roma > From dakkar at thenautilus.net Wed Feb 6 05:11:08 2008 From: dakkar at thenautilus.net (Gianni Ceccarelli) Date: Wed, 6 Feb 2008 14:11:08 +0100 Subject: [Roma.pm] - perfunc In-Reply-To: <47A9B0F2.8000105@perl.it> References: <9002b4ca0710070335w6f84370euaab30d96f4721732@mail.gmail.com> <911180828.20080205120939@perl.it> <47A9A58C.4010607@libero.it> <47A9B0F2.8000105@perl.it> Message-ID: <20080206141108.2042fe9d@dechirico> On 2008-02-06 Aldo Calpini wrote: > $dec = eval "0b$bin"; Detto anche: use Math::BigInt; $dec=Math::BigInt->new("0b$bin")->numify() Ok, non ? meno orrendo... ma ? un pelo pi? safe (se $bin eq '0;system("rm -rf /")' ...) -- Dakkar - GPG public key fingerprint = A071 E618 DD2C 5901 9574 6FE2 40EA 9883 7519 3F88 key id = 0x75193F88 You first parents of the human race... who ruined yourself for an apple, what might you have done for a truffled turkey? -- Brillat-savarin, "Physiologie du Gout" -------------- next part -------------- A non-text attachment was scrubbed... Name: signature.asc Type: application/pgp-signature Size: 189 bytes Desc: not available Url : http://mail.pm.org/pipermail/roma/attachments/20080206/f2ab8883/attachment.bin From mmastria at altevie.com Tue Feb 19 03:18:26 2008 From: mmastria at altevie.com (Marco Mastria) Date: Tue, 19 Feb 2008 12:18:26 +0100 Subject: [Roma.pm] Altevie Technologies: ricerca urgente programmatore senior PERL Message-ID: <001601c872e9$3557e1dc$6732a8c0@altevie.com> Buongiorno, per un nostro importante cliente, ricerchiamo con urgenza 1 programmtore senior PERL sulla sede di Roma. ? prevista una trasferta di 2 mesi a Torino. Il periodo di lavoro ? di 6 mesi minimo. In caso di interesse si richiede: - CV - tariffa giornaliera - spese di trasferta - data di disponibilit? Per contatto immediato sono raggiungibile al 3357436942 Cordiali saluti Marco Mastria