[bcn-pm] dubte

[Jordi Delgado]

Hola,

Hi ha una cosa que em porta una mica de cap.
En un dels nous capitols de la darrera edicio
de la Llama, hi ha aixo:

(...)
given( $ARGV[0] ) {
	when( /^-?\d+\.\d+$/ ) { #smart
			say 'Not a number!' }
	when( $_ > 10 ) { #dumb
			say 'Number is greater than 10' }
	when( $_ < 10 ) { #dumb
			say 'Number is less than 10' }
	default { say 'Number is 10' }
}
(...)

Es bastant obvi el que vol fer, oi?

El que em treu el son es el primer when:

        when( /^-?\d+\.\d+$/ ) { #smart
                        say 'Not a number!' }

Com que 'Not a number'?? Si precisament 
l'expressio regular /^-?\d+\.\d+$/ amb el que
fa matching es amb (alguns) nombres!!

En que m'estic equivocant??

Salut!

Jordi

PS: He mirat a les errata del llibre i aixo
no hi es. Tambe he buscat pels foros habituals
i no ho he trobat.

PS(II): Aixo pot ser molt interessant, no creieu?
http://programming-musings.org/2009/05/25/flib/