undef in data dumper output

2007-09-25 Thread shadkeene
I'm using html::tokeparser::simple and will next place desired data into hashes, but I'm having problems getting to the individual pieces of data. After using html::tokeparser::simple, then using a regex and pushing data into a new array, I can't access individual elements of the array. Using data

Re: AFAIK

2007-09-25 Thread Jan Chorowski
Well it's AFAIK ;) As Far As I Know Jan Chorowski On Mon, 24 Sep 2007 22:11:44 +0530 Somu <[EMAIL PROTECTED]> wrote: > What does it mean? AFAIK? I have seeing it a lot.. Earlier i've been > seeing the HTH, and a guess gave the answer.. But this one, AFAIK... > Are there any more such short forms

Strange error

2007-09-25 Thread Caronte
Hi everybody. I'm learning Perl and CGI programming using MAMP as web- server on OSX and I can't use the standard CGI module. Look at this (very) simple script: #!/usr/local/bin/perl use CGI ':standard'; print header(); print start_html(); for $i (param()) { print "", $i, ": ", param($i), "

Re: AFAIK

2007-09-25 Thread Andy Greenwood
Somu wrote: What does it mean? AFAIK? I have seeing it a lot.. Earlier i've been seeing the HTH, and a guess gave the answer.. But this one, AFAIK... Are there any more such short forms? As far as I know Hope that helps! http://www.ucandoit.org.uk/knowledgebase/webacronyms.html -- To unsu

regex help

2007-09-25 Thread Jonathan Lang
I'm trying to devise a regex that matches from the first double-quote character found to the next double-quote character that isn't part of a pair; but for some reason, I'm having no luck. Here's what I tried: /"(.*?)"(?!")/ Sample text: author: "Jonathan ""Dataweaver"" Lang" key=val What

Re: undef in data dumper output

2007-09-25 Thread John W. Krahn
[EMAIL PROTECTED] wrote: I'm using html::tokeparser::simple and will next place desired data into hashes, but I'm having problems getting to the individual pieces of data. After using html::tokeparser::simple, then using a regex and pushing data into a new array, I can't access individual elemen

Re: regex help

2007-09-25 Thread Rob Dixon
Jonathan Lang wrote: I'm trying to devise a regex that matches from the first double-quote character found to the next double-quote character that isn't part of a pair; but for some reason, I'm having no luck. Here's what I tried: /"(.*?)"(?!")/ Sample text: author: "Jonathan ""Dataweave

Re: file search containing string

2007-09-25 Thread Paul Lalli
On Sep 24, 4:46 pm, [EMAIL PROTECTED] (Nishi Bhonsle) wrote: > How can I use perl to do the following - > > --Look for a file on a filesystem containing a string such as > "Product Name 1.0.0.0.0" perldoc File::Find perldoc perlretut > --Then get the disk location path of the file and store the

Re: Strange error

2007-09-25 Thread Ken Foskey
> 500 Server Error > [Mon Sep 24 21:00:38 2007] [error] [client ::1] (2)No such file or > directory: exec of '/Applications/MAMP/cgi-bin/backatcha-cgi' failed > [Mon Sep 24 21:00:38 2007] [error] [client ::1] Premature end of > script headers: backatcha-cgi Why is there a hyphen not a dot? backat

Re: Strange error

2007-09-25 Thread Matthew Whipple
Some suggestions: rewrite ':standard'; as qw/:standard/; use warnings; check the web server error log for more verbose debugging information It would be a lot easier to diagnose if you know what file or directory isn't being found/accessed. Caronte wrote: Hi everybody. I'm

Re: regex help

2007-09-25 Thread Jonathan Lang
Rob Dixon wrote: > Jonathan Lang wrote: > > I'm trying to devise a regex that matches from the first double-quote > > character found to the next double-quote character that isn't part of > > a pair; but for some reason, I'm having no luck. Here's what I tried: > > > > /"(.*?)"(?!")/ > > > > Sam

Re: regex help

2007-09-25 Thread Rob Dixon
Jonathan Lang wrote: Rob Dixon wrote: Jonathan Lang wrote: I'm trying to devise a regex that matches from the first double-quote character found to the next double-quote character that isn't part of a pair; but for some reason, I'm having no luck. Here's what I tried: /"(.*?)"(?!")/ Sample

need help parsing file for output

2007-09-25 Thread Gerald Wheeler
I could use some real expert help here.. I have only the basic - no add-on modules except what comes with Perl What is needed, Is this possible with Perl 5.x.. read from file olddata.txt output to newdata.txt 1) output all numerics inside parenthesis to negative values e.g., (32) should output

Re: need help parsing file for output

2007-09-25 Thread Paul Lalli
On Sep 25, 12:34 pm, [EMAIL PROTECTED] (Gerald Wheeler) wrote: > I could use some real expert help here.. No you could use some real basic help here. There is nothing in your requirements that indicates the need for an "expert" of any sort. > I have only the basic - no add-on modules except what

Re: need help parsing file for output

2007-09-25 Thread John W. Krahn
Gerald Wheeler wrote: I could use some real expert help here.. I have only the basic - no add-on modules except what comes with Perl What is needed, Is this possible with Perl 5.x.. read from file olddata.txt output to newdata.txt 1) output all numerics inside parenthesis to negative values

Re: need help parsing file for output

2007-09-25 Thread Gerald Wheeler
Thanks... This is great... Thanks again! Jerry >>> "John W. Krahn" <[EMAIL PROTECTED]> 09/25/07 12:51 PM >>> Gerald Wheeler wrote: > I could use some real expert help here.. > I have only the basic - no add-on modules except what comes with Perl > > What is needed, Is this possible with Perl 5.

Re: need help parsing file for output

2007-09-25 Thread John W. Krahn
Gerald Wheeler wrote: John, I am getting compile errors.. As for $! I am running Solaris 9 SPARC 64-bit.. errors: # perl -c readFiles.pl "my" variable $file_out masks earlier declaration in same scope at readFiles.pl line 10. "my" variable $file_out masks earlier declaration in same statement

Re: need help parsing file for output

2007-09-25 Thread Dr.Ruud
"John W. Krahn" schreef: > open my $IN, '<', $file_in or die "Cannot open '$file_in' $!" > open my $OUT, '>', $file_out or die "Cannot open '$file_out' $!" These lines could use a ";" at the end. -- Affijn, Ruud "Gewoon is een tijger." -- To unsubscribe, e-mail: [EMAIL PROTECTED] For addit

Re: need help parsing file for output

2007-09-25 Thread John W. Krahn
Dr.Ruud wrote: "John W. Krahn" schreef: open my $IN, '<', $file_in or die "Cannot open '$file_in' $!" open my $OUT, '>', $file_out or die "Cannot open '$file_out' $!" These lines could use a ";" at the end. Oops. Thanks. John -- Perl isn't a toolbox, but a small machine shop where you

LWP - Catching connection timeout

2007-09-25 Thread yitzle
When a connection timeout occurs, "the library disconnects and creates an internal timeout response" [1]. This then exits my script. Is there a way to change what occurs on timeout? [1] http://search.cpan.org/~gaas/libwww-perl-5.808/lib/LWP.pm -- To unsubscribe, e-mail: [EMAIL PROTECTED] For add

Re: LWP - Catching connection timeout

2007-09-25 Thread Tom Phoenix
On 9/25/07, yitzle <[EMAIL PROTECTED]> wrote: > When a connection timeout occurs, "the library disconnects and creates > an internal timeout response" [1]. This then exits my script. > Is there a way to change what occurs on timeout? This sounds like an advanced LWP issue. Have you tried asking o

Re: bootstrapping in Perl

2007-09-25 Thread Tom Phoenix
On 9/24/07, Pedro Soto <[EMAIL PROTECTED]> wrote: > I need to do some bootstrap analysis and found a module in CPAN > called Math::Random::OO::Bootstrap. Does any body has > experience with it? Did you choose that module because its documentation led you to believe that it would be useful to you

Re: LWP - Catching connection timeout

2007-09-25 Thread yitzle
On 9/25/07, Tom Phoenix <[EMAIL PROTECTED]> wrote: > On 9/25/07, yitzle <[EMAIL PROTECTED]> wrote: > > > When a connection timeout occurs, "the library disconnects and creates > > an internal timeout response" [1]. This then exits my script. > > Is there a way to change what occurs on timeout? > >

perl tk question

2007-09-25 Thread macuser9214
I am trying to make a tk app that parses the qrz callsign ham radio database: It's not working. I'm trying to get information from the text field, and the result in the gray box. #!/usr/bin/perl use Tk; use LWP::Simple; use LWP::UserAgent; my $main = MainWindow -> new(); $entr

Re: perl tk question

2007-09-25 Thread patmarbidon
can you add after your 'insert' $text1->update() to make a refresh. You need an update if there is no new event in your widget. Be areful : Don't use update for each line if you insert a lot of lines but only at the end of a batch or only every 100 lines to keep good performance. macus