Re: Cannot get the simplest of SOAP servers running.

2008-04-25 Thread J. Peng
It has said: [Thu Apr 24 19:38:26 2008] [error] [client MY_IP] Can't locate object method "new" via package "HTTP::Response" (perhaps you forgot to load "HTTP::Response"?) at /usr/lib/perl5/site_perl/5.8.5/SOAP/Transport/ HTTP.pm line 473. Maybe you didn't use that module? On Fri, Apr 25, 2008

Re: Properly displaying items from hash

2008-04-25 Thread icarus
Thanks everybody...here is the final code I crafted from my original and your suggestions. #!/usr/bin/perl use warnings; use strict; my $ca_path = "log_ca.txt"; my $aa_path = "log_aa.txt"; my %final_report; my @ca_filenames; my @aa_filenames; open (CAFILE, $ca_path) or die $!; my @ca_files =

Re: regex question

2008-04-25 Thread J. Peng
On Fri, Apr 25, 2008 at 12:47 AM, David Nicholas Kayal <[EMAIL PROTECTED]> wrote: > > why is the first one true? > check 'perldoc perlre' : The following standard quantifiers are recognized: * Match 0 or more times \d* means 0 or more numbers. -- J. Peng - QQMail Op

regex question

2008-04-25 Thread David Nicholas Kayal
[EMAIL PROTECTED] quick_test]$ cat test_regex.pl #!/usr/bin/perl -w use strict; my $line = "test_text"; if($line =~ m/^\d*/) { print "true\n"; } else { print "false\n"; } if($line =~ m/^\d/) { print "true\n"; } else { print "false\n"; } [EMAIL PROTECTED] quick_t

Cannot get the simplest of SOAP servers running.

2008-04-25 Thread Philluminati
I am trying to follow this guide to make a perl based SOAP server: http://articles.techrepublic.com.com/5100-22-1046624.html But the client times out waiting for a response. If I visit the perl cgi script in the browser I get a "500 internal error" and when I look in the apache error log I can se

Re: Advice on how to approach character translation

2008-04-25 Thread R (Chandra) Chandrasekhar
Jenda Krynicky wrote: ... and build a regexp to match the 1-3 characters to replace: @signs = sort {length($b) <=> length($a)} keys %trans; Thanks for this priceless construct. It was very helpful indeed. @signs = map quotemeta($_) @signs; @signs = map quotemeta($_), @signs; # needed a c

Re: regex question

2008-04-25 Thread David Nicholas Kayal
Thank you. On Fri, 25 Apr 2008, J. Peng wrote: On Fri, Apr 25, 2008 at 12:47 AM, David Nicholas Kayal <[EMAIL PROTECTED]> wrote: why is the first one true? check 'perldoc perlre' : The following standard quantifiers are recognized: * Match 0 or more times \d* me

strings printing bug

2008-04-25 Thread evan9021
The following script is to read 4 consecutive lines at a time from a file, concatenate the first 3 lines (with a ", "), and print the result to STDOUT. If the 3 lines aren't concatenated they print correctly, however if they are, the result is gibberish. Any suggestions. thx., EC. -

Re: strings printing bug

2008-04-25 Thread John W. Krahn
[EMAIL PROTECTED] wrote: The following script is to read 4 consecutive lines at a time from a file, concatenate the first 3 lines (with a ", "), and print the result to STDOUT. If the 3 lines aren't concatenated they print correctly, however if they are, the result is gibberish. Any suggestions