From aventuras.de.joao.sem.medo at gmail.com Fri Nov 9 03:15:36 2007 From: aventuras.de.joao.sem.medo at gmail.com (Joao Miguel Ferreira) Date: Fri, 09 Nov 2007 11:15:36 +0000 Subject: [Viana-pm] =?iso-8859-1?q?validar_endere=E7os_IP_e_netmasks?= Message-ID: <1194606936.3910.8.camel@azagthot.critical.pt> Ol? a todos, ando ? procura de alguma coisa (m?dulo, etc) em Perl que me permita fazer valida??o de endrelos IP e netmasks (IPV4).... para evitar coisas como 255.255.2555.0 ou 192.168.257.13 ... o que recomendam ? thx Joao Ferreira From albie at alfarrabio.di.uminho.pt Fri Nov 9 04:01:20 2007 From: albie at alfarrabio.di.uminho.pt (=?UTF-8?B?QWxiZXJ0byBNYW51ZWwgQnJhbmTDo28gU2ltw7Vlcw==?=) Date: Fri, 09 Nov 2007 12:01:20 +0000 Subject: [Viana-pm] =?utf-8?q?validar_endere=C3=A7os_IP_e_netmasks?= In-Reply-To: <1194606936.3910.8.camel@azagthot.critical.pt> References: <1194606936.3910.8.camel@azagthot.critical.pt> Message-ID: <47344C10.1000302@alfarrabio.di.uminho.pt> E tal e coisa... Regexp::Common? :D Joao Miguel Ferreira wrote: > Ol? a todos, > > ando ? procura de alguma coisa (m?dulo, etc) em Perl que me permita > fazer valida??o de endrelos IP e netmasks (IPV4).... > > para evitar coisas como 255.255.2555.0 ou 192.168.257.13 ... > > o que recomendam ? > > thx > > Joao Ferreira > > > > _______________________________________________ > Viana-pm mailing list > Viana-pm at pm.org > http://mail.pm.org/mailman/listinfo/viana-pm -- Alberto Sim?es - Departamento de Inform?tica - Universidade do Minho Campus de Gualtar - 4710-057 Braga - Portugal From aventuras.de.joao.sem.medo at gmail.com Fri Nov 9 10:14:55 2007 From: aventuras.de.joao.sem.medo at gmail.com (Joao Miguel Ferreira) Date: Fri, 09 Nov 2007 18:14:55 +0000 Subject: [Viana-pm] =?iso-8859-1?q?validar_endere=E7os_IP_e_netmasks?= In-Reply-To: <47344C10.1000302@alfarrabio.di.uminho.pt> References: <1194606936.3910.8.camel@azagthot.critical.pt> <47344C10.1000302@alfarrabio.di.uminho.pt> Message-ID: <1194632095.3910.61.camel@azagthot.critical.pt> On Fri, 2007-11-09 at 12:01 +0000, Alberto Manuel Brand?o Sim?es wrote: > E tal e coisa... Regexp::Common? :D > ok. thx. vou ver.. :) jmf > Joao Miguel Ferreira wrote: > > Ol? a todos, > > > > ando ? procura de alguma coisa (m?dulo, etc) em Perl que me permita > > fazer valida??o de endrelos IP e netmasks (IPV4).... > > > > para evitar coisas como 255.255.2555.0 ou 192.168.257.13 ... > > > > o que recomendam ? > > > > thx > > > > Joao Ferreira > > > > > > > > _______________________________________________ > > Viana-pm mailing list > > Viana-pm at pm.org > > http://mail.pm.org/mailman/listinfo/viana-pm > From aventuras.de.joao.sem.medo at gmail.com Wed Nov 14 08:14:38 2007 From: aventuras.de.joao.sem.medo at gmail.com (Joao Miguel Ferreira) Date: Wed, 14 Nov 2007 16:14:38 +0000 Subject: [Viana-pm] impedir STDIN echo no STDOUT Message-ID: <1195056878.3983.38.camel@azagthot.critical.pt> ol?, como ? que eu impe?o o aparecimento do echo no STDOUT daquilo que o utilizador est? a digitar no teclado, p.ex. numa situa??o de inserir uma poassword ? thx Joao From balinha at gmail.com Mon Nov 19 15:01:10 2007 From: balinha at gmail.com (Ricardo Balinha) Date: Mon, 19 Nov 2007 23:01:10 +0000 Subject: [Viana-pm] impedir STDIN echo no STDOUT In-Reply-To: <1195056878.3983.38.camel@azagthot.critical.pt> References: <1195056878.3983.38.camel@azagthot.critical.pt> Message-ID: Est?s a usar Linux? Em linux podes usar: print "Please enter your password:\n"; system("stty -echo"); my $password = ; system("stty echo"); chop($password); print "Your password is $password\n"; Abra?o, Ricardo Balinha On Nov 14, 2007 4:14 PM, Joao Miguel Ferreira wrote: > ol?, > > como ? que eu impe?o o aparecimento do echo no STDOUT daquilo que o > utilizador est? a digitar no teclado, p.ex. numa situa??o de inserir uma > poassword ? > > thx > > Joao > > > > _______________________________________________ > Viana-pm mailing list > Viana-pm at pm.org > http://mail.pm.org/mailman/listinfo/viana-pm > From balinha at gmail.com Mon Nov 19 15:18:48 2007 From: balinha at gmail.com (Ricardo Balinha) Date: Mon, 19 Nov 2007 23:18:48 +0000 Subject: [Viana-pm] impedir STDIN echo no STDOUT In-Reply-To: References: <1195056878.3983.38.camel@azagthot.critical.pt> Message-ID: Aqui: http://www.unix.org.ua/orelly/perl/cookbook/ch15_11.htm Tamb?m tens outra receita usando o m?dulo Term::ReadKey. Ricardo Balinha On Nov 19, 2007 11:01 PM, Ricardo Balinha wrote: > Est?s a usar Linux? > > > Em linux podes usar: > > > print "Please enter your password:\n"; > > system("stty -echo"); > my $password = ; > system("stty echo"); > > chop($password); > > print "Your password is $password\n"; > > > Abra?o, > Ricardo Balinha > > > On Nov 14, 2007 4:14 PM, Joao Miguel Ferreira > > wrote: > > ol?, > > > > como ? que eu impe?o o aparecimento do echo no STDOUT daquilo que o > > utilizador est? a digitar no teclado, p.ex. numa situa??o de inserir uma > > poassword ? > > > > thx > > > > Joao > > > > > > > > _______________________________________________ > > Viana-pm mailing list > > Viana-pm at pm.org > > http://mail.pm.org/mailman/listinfo/viana-pm > > > From aventuras.de.joao.sem.medo at gmail.com Tue Nov 20 09:05:51 2007 From: aventuras.de.joao.sem.medo at gmail.com (Joao Miguel Ferreira) Date: Tue, 20 Nov 2007 17:05:51 +0000 Subject: [Viana-pm] comparar dois ficheiros de XML.... Message-ID: <1195578351.4052.80.camel@azagthot.critical.pt> Ol? a todos, preciso de fazer um programa em Perl que me ajude a encontrar diferen?as em documentos XML. imaginem um processo que transforma XML, pex. myFile.xml --> |processo| --> xmlFile.xml.processed - que Elements foram alterados ? - que Elements novos tenho ? - que atributos mudaram de valor - que novos atribuitos foram acrescentados ? dava-me um jeita?o !!!! encontrei isto: ------------------------------- use XML::SemanticDiff; my $diff = XML::SemanticDiff->new(); my @differences = $diff->compare('old.xml', 'new.xml'); foreach my $warning (@differences) { print $warning->{message} . "\n"; } ------------------------------- mas ainda n testei.... algu?m j? passou pelo mesmo ? que tools usaram ? boas... m?s ??? $thx++; Joao