[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