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 PROTEC

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 > Wi

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

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

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.

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? > -&

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: 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 = ; > >> @nl = map /^\s*\n/?1:0,@l; > >> map { print $l[$_] if

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 '',; > > print for @ll[1 .. $#ll - 1] ; > > > > That code does not meet the OP's spe

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 '',; 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: 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 on

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 = ; chomp @lfile0; @meses = qw(ene feb mar abr may jun jul ago sep oct nov dic); @files= glob "78*"; my %textos;

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 00:

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 > >Subject: Re: about the dot > > > >From: Jeff Pang <[EMAIL PROTECTED]> > >> I'm a little confused by perl's dot operator.f

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 >

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