Re: regexp behin assertions ?!

2008-07-02 Thread obdulio santana
Hi Where is a solution(s) of this thread? It's a litle bit weird ask for help, and don't offer a posible solution. At least with a study case would be enough, don't mentioning further details. cheers -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: Automation

2008-06-30 Thread obdulio santana
In windows there is a freeware, it's a clon for windows I'm using it for several months and works fine. nncronlt111.exe it's small and easy to use. I found in ten minutes google searching. if you want it, tell me how can I send to you. HTH 2008/6/30 Tobias Eichner [EMAIL PROTECTED]:

Re: print spanish symbols

2008-03-14 Thread obdulio santana
2008/3/13, Jenda Krynicky [EMAIL PROTECTED]: From: obdulio santana [EMAIL PROTECTED] 2008/3/12, Jenda Krynicky [EMAIL PROTECTED]: . . I see. Sorry. Properly set is not enough when it comes to Windows. MS Windblows uses two encodings. For reasons I would love to have a word

Re: print spanish symbols

2008-03-13 Thread obdulio santana
2008/3/12, Jenda Krynicky [EMAIL PROTECTED]: From: obdulio santana [EMAIL PROTECTED] I want to show some áéíóú or ~n ~N in my program but I dont know how to print it in a properly way; perl -e print \algodón\n\ algod 3/4 n thanks in advance. I'm afraid you'll have to tell

Re: functions: rotate and factorial

2008-03-13 Thread obdulio santana
2008/3/13, Jenda Krynicky [EMAIL PROTECTED]: Date sent: Thu, 13 Mar 2008 18:06:27 +0530 From: Sharan Basappa [EMAIL PROTECTED] To: beginners@perl.org Subject:functions: rotate and factorial Hi, I was wondering if perl

print spanish symbols

2008-03-12 Thread obdulio santana
I want to show some áéíóú or ñ Ñ in my program but I dont know how to print it in a properly way; perl -e print \algodón\n\ algod¾n thanks in advance.

How to read from keyboard?

2008-02-27 Thread obdulio santana
Hi. I want to read from keyboard some keys [pagedown], [Home],[End][PageUp][up][left][down][right]. how can I do it? Thanks in advance.

Re: How to read from keyboard?

2008-02-27 Thread obdulio santana
2008/2/27, MK [EMAIL PROTECTED]: On 02/27/2008 09:04:50 AM, obdulio santana wrote: - Hi. - - I want to read from keyboard some keys [pagedown], - [Home],[End][PageUp][up][left][down][right]. - - how can I do it? - - Thanks in advance. - - Term::Readkey also works but is poorly

Re: Printing text between two blank lines

2008-02-21 Thread obdulio santana
2008/2/20, John W. Krahn [EMAIL PROTECTED]: Gunnar Hjalmarsson wrote: obdulio santana wrote: Please let me know if everything is Ok. @l = DATA; @nl = map /^\s*\n/?1:0,@l; map { print $l[$_] if ($nl[$_ - 1]$nl[$_]$nl[$_ + 1] eq 101 ) } (0 .. $#nl); 1. It's no longer a tiny

Re: Printing text between two blank lines

2008-02-20 Thread obdulio santana
I offer you, a tiny version , @ll=split /^\s*\n/m,join '',DATA; print for @ll[1 .. $#ll - 1] ; __END__ pri dfsdfsa dfasdf asdf first second last ass sad sas d Maybe this helps somebody. Thaks Perl's folks.

Re: Printing text between two blank lines

2008-02-20 Thread obdulio santana
2008/2/20, Gunnar Hjalmarsson [EMAIL PROTECTED]: obdulio santana wrote: I offer you, a tiny version , @ll=split /^\s*\n/m,join '',DATA; print for @ll[1 .. $#ll - 1] ; example data snipped That code does not meet the OP's specification. Please consider a file whose data looks like

Re: removing duplicates

2008-02-05 Thread obdulio santana
May be this helps perl -lne print if ++$D{$_} == 1 address.txt regards 2008/2/5, Rob Dixon [EMAIL PROTECTED]: boll wrote: I'm trying to write a script to remove duplicate e-mail addresses from a list. I'd like some help understanding... 1. Why does it remove all but one of the

Re: uninitialized value in printf

2008-02-02 Thread obdulio santana
Thaks listers, your comments helped a lot. everything was fixed. regards

uninitialized value in printf

2008-02-01 Thread obdulio santana
I must mix 3 files, and produce a little report but in line 23 and 31 is a warning of uninitalized value I really don't see the mistake. Thank you in advance use warnings; @lfile0 = DATA; chomp @lfile0; @meses = qw(ene feb mar abr may jun jul ago sep oct nov dic); @files= glob 78*; my

Re: Looking for regex

2008-01-28 Thread obdulio santana
I offer you a solution and my comments why use hash of 24 elements? using a hash may brings some problem because if file is the joined day+day you finally get a file corresponding for example a month (I use these kind of reports of automatic station) you can face this situation 2007-01-23

Re: speeding up a perl script

2008-01-23 Thread obdulio santana
With a tiny change we shun the use of $c. thereby a bit faster. perl -nle 'END { print $. }' file thanks 2008/1/22, Chas. Owens [EMAIL PROTECTED]: On Jan 22, 2008 2:58 PM, lerameur [EMAIL PROTECTED] wrote: Hello, I wrote a short perl script (65 lines), simply to count some log file

Re: Postponing variable replacement

2008-01-23 Thread obdulio santana
using http://www.unix.org.ua/orelly/perl/advprog/ch05_01.htm maybe it helps #!/usr/bin/perl $t=' $tt is cool\n'; $tt=perl; print eval $t; thanks regards # 2008/1/23, Bryan R Harris [EMAIL PROTECTED]: Is there any way to change the last statement to do what I want, which in this case

Re: about the dot

2008-01-23 Thread obdulio santana
2008/1/22, Jeff Pang [EMAIL PROTECTED]: -Original Message- From: Jenda Krynicky [EMAIL PROTECTED] Sent: Jan 23, 2008 12:59 AM To: beginners-list beginners@perl.org Subject: Re: about the dot From: Jeff Pang [EMAIL PROTECTED] I'm a little confused by perl's dot operator.for