Re: zip command in perl

2006-04-07 Thread Chas Owens
On 4/7/06, Irfan J Sayed [EMAIL PROTECTED] wrote: snip I downloaded the zip file from CPAN But i am not getting one point which command i should use in perl . i mean what is the syntax. which module i should choose from that zip file after unzipping. (zip.pm ?) snip The compressed file for

Re: What is Variable Interpolation [was: Re: Help Required on the Script]

2006-04-07 Thread D. Bolliger
John W. Krahn am Freitag, 7. April 2006 01.09: D. Bolliger wrote: btw, @04 is not a valid (array) variable name; they must not start with a digit, as not keyword/builtin does. $ perl -Mwarnings -Mstrict -le' our @04 = 10 .. 14; print @04' 10 11 12 13 14 You are probably thinking scalars

Re: zip command in perl

2006-04-07 Thread Dr.Ruud
Irfan J Sayed schreef: Please don't top-post. Hi Chas, Try e-mail. I downloaded the zip file from CPAN Why? If you are on Windows and run ActivePerl, do C:\Perl ppm and wait for the ppm-prompt, then: ppm query Archive-Zip Querying target 1 (ActivePerl 5.8.7.813) 1.

how to load user modules?

2006-04-07 Thread Roger Mayfield
How could I write a script that could anonymously accept user written modules that are listed in a text file? reading from a text file I get, but where would I start on loading the modules dynamically like that? Roger Mayfield -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: how to load user modules?

2006-04-07 Thread Chas Owens
On 4/7/06, Roger Mayfield [EMAIL PROTECTED] wrote: How could I write a script that could anonymously accept user written modules that are listed in a text file? reading from a text file I get, but where would I start on loading the modules dynamically like that? Roger Mayfield snip Well, in

hash value and grep / get some files searched and indexed

2006-04-07 Thread Alan_C
Hi, each file name begins with xtst of which I've near 18 of these small files (for example, xtst033006, xtst040106, xtst022406 etc. etc.) these text files may contain code snippet and/or help, howto info within the first 6 lines of each of these files there is a keyword line that begins with

Re: Zombie Trouble Shooting

2006-04-07 Thread John W. Krahn
Chas Owens wrote: On 4/6/06, John W. Krahn [EMAIL PROTECTED] wrote: snip If you had strictures enabled then perl would have told you. Make sure that this is near the top of your programs: use strict; snip Yes, always good advice. Unfortunately it would not have helped me here since I was

Re: hash value and grep / get some files searched and indexed

2006-04-07 Thread John W. Krahn
Alan_C wrote: Hi, Hello, each file name begins with xtst of which I've near 18 of these small files (for example, xtst033006, xtst040106, xtst022406 etc. etc.) these text files may contain code snippet and/or help, howto info within the first 6 lines of each of these files there is a

Re: Zombie Trouble Shooting

2006-04-07 Thread Chas Owens
On 4/7/06, John W. Krahn [EMAIL PROTECTED] wrote: Chas Owens wrote: On 4/6/06, John W. Krahn [EMAIL PROTECTED] wrote: snip If you had strictures enabled then perl would have told you. Make sure that this is near the top of your programs: use strict; snip Yes, always good advice.

mysql insert errors

2006-04-07 Thread Practical Perl
Hello,all, I wrote a script to insert datas to mysql database.The insert frequency is about 45 times per second. Most of the insert actions are successful,but I still see some errors as follow: DBD::mysql::st execute failed: INSERT command denied to user 'abc'@'192.168.3.10' for table 'rcpt' at

Re: mysql insert errors

2006-04-07 Thread Chas Owens
On 4/7/06, Practical Perl [EMAIL PROTECTED] wrote: Hello,all, I wrote a script to insert datas to mysql database.The insert frequency is about 45 times per second. Most of the insert actions are successful,but I still see some errors as follow: DBD::mysql::st execute failed: INSERT command

Re: mysql insert errors

2006-04-07 Thread Dr.Ruud
Practical Perl schreef: I wrote a script to insert datas to mysql database.The insert frequency is about 45 times per second. Most of the insert actions are successful,but I still see some errors as follow: DBD::mysql::st execute failed: INSERT command denied to user 'abc'@'192.168.3.10'

RE: Can any one tell me a better way to upload a file from the HTML form to a location in my home directorrt.

2006-04-07 Thread Moon, John
John W Moon Systems Project Analyst Enterprise Information Technology Services (EITS) Department of Management Services 4030 Esplanade Way, Suite 260G Tallahassee, Fl 32399-0950 Office: (850)922-7511 Email: [EMAIL PROTECTED] Please note: Florida has a very broad public records law. Most written

Re: zip command in perl

2006-04-07 Thread Oliver Block
Am Freitag, 7. April 2006 07:15 schrieb Irfan J Sayed: I need to zip my backup dir. so that it will automatically convert my backup dir to backup.zip file can it be happen through perl ? Why don't you use backticks? btw: are you running perl on win32? cu, Oliver -- To unsubscribe,

Re: mysql insert errors

2006-04-07 Thread Practical Perl
Thanks for all,I'll try some ways to fit it.

split on .

2006-04-07 Thread Brent Clark
Hi all I have a string like so 01.01.04 I need to split and add it to an array my method of ($abc) = $test =~ /\./g; does not seem to provide me with a satisfying result and I get back is the period. If anyone could assit, it would be most helpful Kind Regards Brent Clark -- To

Re: split on .

2006-04-07 Thread HObbES
Hi Brent, The split() is wonderful for doing what you want. -Anne This one time, Brent Clark wrote: Hi all I have a string like so 01.01.04 I need to split and add it to an array my method of ($abc) = $test =~ /\./g; does not seem to provide me with a satisfying result

Re: split on .

2006-04-07 Thread Tom Phoenix
On 4/7/06, Brent Clark [EMAIL PROTECTED] wrote: I have a string like so 01.01.04 I need to split and add it to an array Split, huh? Have you tried using the split() operator? It's covered in the perlfunc manpage. But if you're dealing with date-and-time data, you may really be looking for

Re: split on .

2006-04-07 Thread Mr. Shawn H. Corey
On Fri, 2006-07-04 at 17:38 +0200, Brent Clark wrote: Hi all I have a string like so 01.01.04 I need to split and add it to an array my method of ($abc) = $test =~ /\./g; does not seem to provide me with a satisfying result and I get back is the period. If anyone could

RE: zip command in perl

2006-04-07 Thread Timothy Johnson
If you are running on Windows you can install Archive::Zip through PPM. ppm install Archive-Zip -Original Message- From: Oliver Block [mailto:[EMAIL PROTECTED] Sent: Friday, April 07, 2006 5:03 AM To: beginners@perl.org Subject: Re: zip command in perl Am Freitag, 7. April 2006 07:15

Very Basic Web Scrape

2006-04-07 Thread kc68
I'm trying to learn web scraping and am stopped at the basic point of scraping a portion of a web page. I'm able to scrape a full page and save it as *.xml or *.htm, and I think I understand regex, but the following fails: ** # Prints a portion of a red cross web page to a new

Re: Very Basic Web Scrape

2006-04-07 Thread Oliver Block
Hi, I understand regex, but the following fails: open PAGE, 'c://redcross.htm'; while( my $line = PAGE ) { $line =~ /Health and Safety Classes/ print $1\n; } What fails? Your forget a ';' after the regex but I guess that's not what you mean!? :) cu, Oliver -- To unsubscribe, e-mail:

Re: Very Basic Web Scrape

2006-04-07 Thread kc68
On Fri, 07 Apr 2006 16:02:53 -0400, Oliver Block [EMAIL PROTECTED] wrote: Hi, I understand regex, but the following fails: open PAGE, 'c://redcross.htm'; while( my $line = PAGE ) { $line =~ /Health and Safety Classes/ print $1\n; } What fails? Your forget a ';' after the regex but I guess

Re: Very Basic Web Scrape

2006-04-07 Thread Joshua Colson
On Fri, 2006-04-07 at 16:36 -0400, [EMAIL PROTECTED] wrote: On Fri, 07 Apr 2006 16:02:53 -0400, Oliver Block [EMAIL PROTECTED] wrote: Hi, I understand regex, but the following fails: open PAGE, 'c://redcross.htm'; while( my $line = PAGE ) { # $line =~ /Health and Safety Classes/

Re: windows command help

2006-04-07 Thread JupiterHost.Net
Irfan J Sayed wrote: Hi, Following command works fine. use File::Copy::Recursive qw(dircopy); dircopy($source, $target); Thanks for all your help. Excellent! Glad to help :) You may want to consider posting inline instead of top posting for list discussions. Its much easier to read

Re: Very Basic Web Scrape

2006-04-07 Thread Oliver Block
Am Freitag, 7. April 2006 22:36 schrieb [EMAIL PROTECTED]: I was trying to limit the result to the words /Health and Safety Classes/ that appear on the page. How do I get there? At first you need to understand regex! :) open PAGE, 'c://redcross.htm'; while( my $line = PAGE ) { $line =~

Re: Very Basic Web Scrape

2006-04-07 Thread Dave Gray
On 4/7/06, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote: On Fri, 07 Apr 2006 16:02:53 -0400, Oliver Block [EMAIL PROTECTED] wrote: I understand regex, but the following fails: open PAGE, 'c://redcross.htm'; while( my $line = PAGE ) { $line =~ /Health and Safety Classes/ print $1\n; }

Re: Very Basic Web Scrape

2006-04-07 Thread Jaime Murillo
On Friday 07 April 2006 13:15, [EMAIL PROTECTED] wrote: I'm trying to learn web scraping and am stopped at the basic point of scraping a portion of a web page. I'm able to scrape a full page and save it as *.xml or *.htm, and I think I understand regex, but the following fails: