Regex problem with accented characters

2007-03-27 Thread Beginner
Hi, I am trying to extract the iso code and country name from a 3 column table (taken from en.wikipedia.org) and have noticed a problem with accented characters such as Ô. Below is my script and a sample of the data I am using. When I run the script the code beginning CI for Côte d'Ivoire

Re: Regex problem with accented characters

2007-03-27 Thread Mumia W.
On 03/27/2007 03:34 AM, Beginner wrote: Hi, I am trying to extract the iso code and country name from a 3 column table (taken from en.wikipedia.org) and have noticed a problem with accented characters such as Ô. Below is my script and a sample of the data I am using. When I run the script

Re: Regex problem with accented characters

2007-03-27 Thread Rob Dixon
Beginner wrote: Hi, I am trying to extract the iso code and country name from a 3 column table (taken from en.wikipedia.org) and have noticed a problem with accented characters such as Ô. Below is my script and a sample of the data I am using. When I run the script the code beginning CI

Re: Regex problem with accented characters

2007-03-27 Thread Rob Dixon
Beginner wrote: /^(\w{2})\s+(\w+\s\w+\s\w+s\w+|\w+\s\w+\s\w+|\w+\s\w+|\w+)/); It's worth noting that this could be written: /^(\w{2})\s+(\w+(?:\s\w+)*)/); Rob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Diagnosing use/lib problems

2007-03-27 Thread Mike Lesser
On Mar 26, 2007, at 7:32 PM, Tom Phoenix wrote: On 3/26/07, Mike Lesser [EMAIL PROTECTED] wrote: Hi all. First time using subroutines in external files. I've had some sporadic success with some simple libs (not modules), but can't seem to get consistent results. What do you mean by

Re: Learning Perl with shells operations

2007-03-27 Thread Rodrigo Tavares
Hello, With this line the script run, no errors. system su postgres -c '/usr/local/pgsql/bin/pg_ctl start -D /opt/@bancos[$i]'; two things : I use of stricts and warnings, and come this error compilation when i wrote into my code. Global symbol $x requires explicit package name at

Problem with addition in version 5.8.3

2007-03-27 Thread Sunil Babu P
Hi, I facing a problem with perl version 5.8.3 $prog_end_address = 0x_; $trans_address = $prog_end_address + 0x101; In version 5.8.0 $trans_address = 0x1__0100; But in Version 5.8.3 $trans_address = 0x_; I suspect this is because of 32 bit overflow. How to reslove this

Files manipulation

2007-03-27 Thread Rodrigo Tavares
Hello, What's the more fast ? 1) perl -pi -e 's/foo/bar/g' file.txt 2) open the file and make modifications In C/C++ manipulation of files are operations very weighed. Slow perfomace. Best regards, Rodrigo Faria Tavares __ Fale com seus

Re: Problem with addition in version 5.8.3

2007-03-27 Thread Tom Phoenix
On 3/27/07, Sunil Babu P [EMAIL PROTECTED] wrote: I facing a problem with perl version 5.8.3 $prog_end_address = 0x_; $trans_address = $prog_end_address + 0x101; In version 5.8.0 $trans_address = 0x1__0100; But in Version 5.8.3 $trans_address = 0x_; I suspect this is

Re: Telnet question in Perl

2007-03-27 Thread jm
i can't find any reference to a cmw option so i'll assume that's a typo for cmd. is the typo only in the email or also in your script? beyond that, the only difference i see between your script and the net::telnet documentation is your use of single-quotes rather than double-quotes around the

Re: Files manipulation

2007-03-27 Thread Tom Phoenix
On 3/27/07, Rodrigo Tavares [EMAIL PROTECTED] wrote: What's the more fast ? 1) perl -pi -e 's/foo/bar/g' file.txt 2) open the file and make modifications What happens when you time both programs? It may be that the answer for me with my data on my hardware is different than the answer for

RE: Files manipulation

2007-03-27 Thread José Pedro Silva Pinto
First option should be better, because it is faster to implement, and run faster. But open file using perl language and make changes using s operator, should be faster too. The best way to choose should be make a test using two methods (using time unix command before ask perl script to verify

Re: Telnet question in Perl

2007-03-27 Thread jm
then i've exhausted my expertise. the best i can offer now is good luck. anyone else have something better to offer? On 3/27/07, Dukelow, Don [EMAIL PROTECTED] wrote: The cmd typo was only in my e-mail, but I've tried both single and double-quotes. It make no difference! Its only after I

Re: How do I generate a hash from an xml document?

2007-03-27 Thread Dave Adams
#?xml version=1.0 encoding=ISO-8859-1 ? #DATA #RECORD # COLLNAMEFBIS2004/COLLNAME # DOCICP1/DOCI #/RECORD #RECORD # COLLNAMEFBIS2005/COLLNAME # DOCICP2/DOCI #/RECORD #/DATA #!/usr/bin/perl use XML::Simple; use Data::Dumper; # create object $xml = new XML::Simple (KeyAttr=[]); # read XML file

Re: How do I generate a hash from an xml document?

2007-03-27 Thread Rob Dixon
Dave Adams wrote: On 3/26/07, Rob Dixon [EMAIL PROTECTED] wrote: Dave Adams wrote: What are the general steps to building a hash from and xml document? Here are my steps: 1. Read in xml document using XML::Simple 2. Create and empty hash 3. Loop through $VAR1 (the anonymous

Re: Telnet question in Perl

2007-03-27 Thread Tom Phoenix
On 3/26/07, Dukelow, Don [EMAIL PROTECTED] wrote: I'm using Net::Telnet in my Perl script and I can get through the user login ok. But when I try to sudo to root I can't get there. Any ideas? It might be that sudo is (mis-)configured not to allow you root access. But I suspect you've just

Re: Win32::OLE packages

2007-03-27 Thread Vladimir Lemberg
Hi to all, Sorry for asking the same question.. I beleave sombody have used win32:OLE module. From the Module description: OLE Automation brings VisualBasic like scripting capabilities and offers powerful extensibility and the ability to control many Win32 applications from Perl scripts.

Re: Win32::OLE packages

2007-03-27 Thread Vladimir Lemberg
Eventually, I figured it out. use strict; use warnings; use Win32::OLE; my $Excel = Win32::OLE-new('Excel.Application'); my $WorkBook = $Excel-Workbooks-Add; my $freeze_panes = $WorkBook-ActiveSheet-Range(B3)-Select; $Excel-ActiveWindow-{FreezePanes} = 1; - Original Message -