Learning Perl : Exercices

2006-07-07 Thread Monomachus
Ok here I am at the 9th chapter ... But here is a thing that isn't working at my computer : Exercices: Write a program to add a copyright line to all of your exercise answers so far, by placing a line such as: ## Copyright (C) 20XX by Yours Truly Place it in the file immediately after the

Re: iterate over newlines

2006-07-07 Thread Paul Johnson
On Thu, Jul 06, 2006 at 06:04:27PM -0500, JupiterHost.Net wrote: > and look at the author, dconway, if your boss has any sense he'll be > more than happy to use one of damian's modules. Of course, that depends on which module and what you want to use it for. -- Paul Johnson - [EMAIL PROTECTED]

RE: Tk problem

2006-07-07 Thread Nagasamudram, Prasanna Kumar
Hi Raimo If you are running window, then can you try installing through ppm (perl package manager)? C:\>ppm ppm>install Tcl-Tk This way it wil go smoothly and also it will check for dependecies and download automatically. Thanks Prasanna -Original Message- From: [EMAIL PROTECTED] [

Re: Hash - narff

2006-07-07 Thread Beginner
On 5 Jul 2006 at 10:56, Mumia W. wrote: > Beginner wrote: > > Hi, > > > > I am being a bit lazy here. I already had this hash defined (cut & pasted > > from another file) and > > didn't want to re-type it. > > > > my %char = ( > > 65 => 'a', > > 66 => 'b', > > 67 => 'c', > > 68

Re: Learning Perl : Exercices

2006-07-07 Thread John W. Krahn
Monomachus wrote: > Ok here I am at the 9th chapter ... > But here is a thing that isn't working at my computer : > > Exercices: > > Write a program to add a copyright line to all of your exercise answers so > far, by placing a line such as: > > ## Copyright (C) 20XX by Yours Truly > > > P

Tk installation problem with Fedora 4

2006-07-07 Thread Perlguru
Hi, thanks for tips what I have received. However I need to install Tk to Fedora 4. Now I receive erros from tests what I have send for you earlier. I have tried perl -MCPAN -e "install Tk" /Raimo -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Tk installation problem with Fedora 4

2006-07-07 Thread Mr. Shawn H. Corey
[EMAIL PROTECTED] wrote: > > Hi, > thanks for tips what I have received. > However I need to install Tk to Fedora 4. > Now I receive erros from tests what I have > send for you earlier. > > I have tried perl -MCPAN -e "install Tk" > > /Raimo > You can try ignoring the errors and installing Tk

Re:Learning Perl : Exercices

2006-07-07 Thread Monomachus
>That won't work unless you print the current line That still isn't working... try it... C uvazheniem, Monomachus Don't worry, Be Happy -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Learning Perl : Exercices

2006-07-07 Thread Tom Phoenix
On 7/7/06, Monomachus <[EMAIL PROTECTED]> wrote: @ARGV = sort keys %do_these; while (<>) { Isn't working (in Windows)... I need to push Ctrl-C to stop the proccess. That sounds as if @ARGV ended up empty, by the time you got to the diamond operator, and your program is trying to

CGI question on param

2006-07-07 Thread Mike Martin
Does anyone know if there is any way to split the param list returned by CGI.pm by record ie: I have an input form which is populated from a DB query which can have unlimited numbers of records. When the parameters come in the individual params are split, but not the lines for each form. Is the

Re: CGI question on param

2006-07-07 Thread Mr. Shawn H. Corey
Mike Martin wrote: > Does anyone know if there is any way to split the param list returned > by CGI.pm by record ie: > > I have an input form which is populated from a DB query which can have > unlimited numbers of records. > It would be easier to answer your question if you supplied the FORM tag

inherited perl program

2006-07-07 Thread Smith, Derek
I have inherited a program that does snmp walks and gets, but within the code (keep in mind they turned off strict for references) I am failing to understand the push @$node_type “$name”; The person who wrote this said with strict on the push statement above will not work…complains about

RE: inherited perl program

2006-07-07 Thread Smith, Derek
-Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Anthony Ettinger Sent: Friday, July 07, 2006 1:27 PM To: Smith, Derek Subject: Re: inherited perl program On 7/7/06, Smith, Derek <[EMAIL PROTECTED]> wrote: > > > > > I have inherited a program that does snm

Re: inherited perl program

2006-07-07 Thread Mr. Shawn H. Corey
Smith, Derek wrote: > I have inherited a program that does snmp walks and gets, but within the > code (keep in mind they turned off strict for references) > > I am failing to understand the push @$node_type "$name"; > > The person who wrote this said with strict on the push statement above > wil

Need help with error from certain ASCII characters in a CSV file

2006-07-07 Thread Xavier Mas i Ramón
Did you try to replace these characters of the file by they Unicode code (that Perl coulf read)? -- Xavier Mas -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Errors with dynamic extensions loading when running from jsp

2006-07-07 Thread Ray Gebbie
I checked the Socket.so file and it is readable and executable by all (and the directories are readable also). I have no understanding of what the 'Bad address' error means. This is all happening before the script even starts to execute. If I comment out the "use Net::FTP;", I don't get the erro

mod_auth_sim?

2006-07-07 Thread Chasecreek Systemhouse
Does any one know where the source for mod_auth_sim might still be available? Doesn't work: http://www.perl-studio.com/mod_auth_sim/mod_auth_sim-0.0.1.tar.gz None of the google soureces found ofr it appear to work either. Any ideas? -- WC (Bill) Jones -- http://youve-reached-the.endoftheinterne

Re: Errors with dynamic extensions loading when running from jsp

2006-07-07 Thread Mumia W.
Ray Gebbie wrote: I checked the Socket.so file and it is readable and executable by all (and the directories are readable also). I have no understanding of what the 'Bad address' error means. This is all happening before the script even starts to execute. If I comment out the "use Net::FTP;",

File last modified time

2006-07-07 Thread Omega -1911
Hey gang! I am trying to update a script so that it is not so resource (CPU) intensive. Background: 1. The script has to open a rather large number of files (100,000). 2. Instead of opening all of them, I am trying to only open those files where the file was actually MODIFIED not just accessed

RE: File last modified time

2006-07-07 Thread Timothy Johnson
The documentation seems to indicate that the -M is the number of days older than the script start time the file modification time is. I think what you want would be something like: If( (stat $path)[9] > time - 1200 ){ Do something... } Which will get the 10th (starts from 0) element of

write out filenames of files existing on a filesystem into a file

2006-07-07 Thread Nishi Bhonsle
Hi: Can you please help me write a perl script that takes the files from a directory and spits out the filenames into a file. say. I have a file structure on a file system such as C:\Temp\one C:\Temp\two C:\Temp\one\oneone C:\Temp\one\onetwo C:\Temp\one\onethree The original file contains lines

Re: write out filenames of files existing on a filesystem into a file

2006-07-07 Thread Mr. Shawn H. Corey
Nishi Bhonsle wrote: > Hi: > > Can you please help me write a perl script that takes the files from a > directory and spits out the filenames into a file. > say. > I have a file structure on a file system such as > C:\Temp\one > C:\Temp\two > C:\Temp\one\oneone > C:\Temp\one\onetwo > C:\Temp\one\o

question on redirecting output of Perl debugger commands

2006-07-07 Thread Gavin Bowlby
Is there a way to redirect the output of a debugger command to a file? I've tried the: | format, which nicely brings up the "Pager" to allow one page of output at a time to be viewed, which works well with relatively small amounts of data. Unfortunately, my Perl app is large, has many variable

Re: write out filenames of files existing on a filesystem into a file

2006-07-07 Thread Nishi Bhonsle
I was able to writeout the files on a filesystem to a file C:/filelist.txt using the program - $path = "$ARGV[0]"; opendir ( DIR, $path ) or die "Can't open $path: $!"; while(defined($DIR = readdir DIR)) { push(@array_A,$DIR) } closedir DIR; open(FILE,">c:/filelist.txt"); foreach $y

Re: html - timtowtdi

2006-07-07 Thread Tom Allison
Thomas Bätzler wrote: Tom Allison <[EMAIL PROTECTED]> wrote: OK, perl almost has a problem with how many different ways to make web pages. I was looking around for something that was simple but mostly fast and "common" You might also want to check out Embperl and Mason - the latter being

Re: how to avoid "spawning" multiple process of the same script ..

2006-07-07 Thread Randal L. Schwartz
> "BenBart" == BenBart <[EMAIL PROTECTED]> writes: BenBart> How do I prevent multiple instance of the same script from running? Use the "highlander" solution: #!/usr/bin/perl BEGIN { use Fcntl ':flock'; flock DATA, LOCK_EX | LOCK_NB or exit 0; # I'm already running

Re: write out filenames of files existing on a filesystem into a file

2006-07-07 Thread John W. Krahn
Nishi Bhonsle wrote: > I was able to writeout the files on a filesystem to a file C:/filelist.txt > using the program - > > $path = "$ARGV[0]"; > opendir ( DIR, $path ) or die "Can't open $path: $!"; > while(defined($DIR = readdir DIR)) > { > push(@array_A,$DIR) > } > closedir DIR; >

pattern matching problems

2006-07-07 Thread Dr. Claus-Peter Becke
dear members, i'm new in the community. i have some problems processing the query-string exchanged between client and server. i would like to parse the query-string the following way: the query-string contains a sentence, for example: the cat lies on the mat. i have deleted the browser generat