[Cascavel-pm] PerlApplet?

Gabriel Vieira gabriel.vieira em gmail.com
Sexta Fevereiro 17 14:28:50 PST 2006


print "Favor Preencher o campo 'Número' somente com dígitos" if $numero !~ 
/^[0-9]+$/;

melhorando o codigo ;~~ heheh
to mal acostumado.. desculpem :P

Abraços
----- Original Message ----- 
From: "André Garcia Carneiro" <andre.garcia.carneir em terra.com.br>
To: "cascavel-pm" <cascavel-pm em pm.org>
Sent: Friday, February 17, 2006 7:08 PM
Subject: Re: [Cascavel-pm] PerlApplet?




> <exemplo regex em javascript>
> ....
> var regexN = /^[0-9]*$/;
> if(form.numero.value != ""){
> if(!regexN.test(form.numero.value)){
> alert(" Favor preencher o campo 'Nmero' somente com dígitos." );
> form.numero.focus();
> return false;
> }
> ....
> </exemplo regex em javascript>

Bem... estava comparando com Perl mesmo...

.
print "Favor Preencher o campo "Número" somente com dígitos" if($numero !~ 
/^[0-9]*$/ || $numero eq "");


--
André Garcia Carneiro
Developer(Perl)
Member of "São Paulo Perl Mongers" - http://sao-paulo.pm.org

_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm 



Mais detalhes sobre a lista de discussão Cascavel-pm