RE: the File::Copy module

2003-08-19 Thread Saadat Saeed
Hello, Thanks for all your inputs now below you mentioned copy(qq(\\machine1\share\$file),qq(\\mahine2\share\$file)) sorry for my ignorance but what is qq also if I want to be smart and copy it to the c: drive of some user - assuming I am running the script from a Domain Admin login eg. \\

File sizes.

2003-08-19 Thread Rich Parker
Hi, I have been watching the thread about the file::copy. I ran into an issue in the Linux environment that brings a serious question, MAX file size. Keep in mind the server is running 7.0 RH, we have 7.2 Enterprise Server also, and we pay for support. But even the RH support says they can't ha

Cron jobs and perl

2003-08-19 Thread Vema Venkata
Hi Dan The problem still persisits pls. help/suggest me what to do ? When iam executing the xapipgm.pl it is getting executed properly but when iam trying to execute thru crontab it is not xapipgm.pl ** #!/bin/sh #myrun.shell xap

Re: multiple regex in if() staetment

2003-08-19 Thread James Edward Gray II
On Tuesday, August 19, 2003, at 05:54 PM, Dan Muey wrote: I'm trying to figure out the best way to test a string agains a list of regexs like so: my @regex = qw(qr(joe$) qr(^mama) qr([abc])); I see you already got your grep() answer, but... There's definitely no reason to use that qw() operato

RE: the File::Copy module

2003-08-19 Thread Dan Muey
> --- Dan Muey <[EMAIL PROTECTED]> wrote: > > > Try: > > > > > > use strict; > > > use warnings; > > > ... > > > my $returnValue = > > > > > > "copy("machine1\\share\\file1","machine2\\share\\file2"); > > ^ I think that quote will cause problems. > > > > Have you tri

Re: multiple regex in if() staetment

2003-08-19 Thread Wiggins d'Anconia
Dan Muey wrote: Howdy all: I'm trying to figure out the best way to test a string agains a list of regexs like so: my @regex = qw(qr(joe$) qr(^mama) qr([abc])); if($string does not match any of the regexs in @regex) { } So basically if($string !~ [EMAIL PROTECTED]) { ... }

multiple regex in if() staetment

2003-08-19 Thread Dan Muey
Howdy all: I'm trying to figure out the best way to test a string agains a list of regexs like so: my @regex = qw(qr(joe$) qr(^mama) qr([abc])); if($string does not match any of the regexs in @regex) { } So basically if($string !~ [EMAIL PROTECTED]) { ... } I suppose I cou

Re: the File::Copy module

2003-08-19 Thread Gabriel Cooper
Jeff Westman wrote: Try: use strict; use warnings; ... my $returnValue = "copy("machine1\\share\\file1","machine2\\share\\file2"); you probably don't want that first quotation mark before copy. unless ($returnValue) warn "Copy failed: $!"; you could do it in one step as:

paypal module

2003-08-19 Thread awards
Hi, I was curious if anyone have used Business-PayPal module ?? If so is it safe to use? I guess I have to use it under a secure connection? Anthony -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: the File::Copy module

2003-08-19 Thread Jeff Westman
--- Dan Muey <[EMAIL PROTECTED]> wrote: > > Try: > > > > use strict; > > use warnings; > > ... > > my $returnValue = > > "copy("machine1\\share\\file1","machine2\\share\\file2"); > ^ I think that quote will cause problems. > > Have you tried single quotes also? T

RE: the File::Copy module

2003-08-19 Thread Dan Muey
> Try: > > use strict; > use warnings; > ... > my $returnValue = > "copy("machine1\\share\\file1","machine2\\share\\file2"); ^ I think that quote will cause problems. Have you tried single quotes also? That way you don't have to worry about properly escaping

Re: the File::Copy module

2003-08-19 Thread Jeff Westman
Try: use strict; use warnings; ... my $returnValue = "copy("machine1\\share\\file1","machine2\\share\\file2"); unless ($returnValue) warn "Copy failed: $!"; (not tested) -JW --- Saadat Saeed <[EMAIL PROTECTED]> wrote: > I was just reading the File::Copy module. Now on

the File::Copy module

2003-08-19 Thread Saadat Saeed
I was just reading the File::Copy module. Now on a pure Win32 environment will this work copy("\\machine1\share\file1","\\machine2\share\file2"); Or should I do something else??? __ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software

RE: Measure bandwidth for my site

2003-08-19 Thread Dan Muey
Howdy, When starting a new thread don't top post on another thread. > I wanted to test the bandwidth for my website every 15 > minutes (to verify my ISP was getting me 1.5 like they > say)and was wondering if there are any modules that make the That would depend on how you plan to measure the

RE: unexpected runtime error

2003-08-19 Thread Hanson, Rob
> $addr4=$abbrevs{$addr4} if (defined $abbrevs{$addr4}); I think you might want to use "exists" instead of "defined" in this case, or maybe both depending on what you are trying to do. $addr4=$abbrevs{$addr4} if (exists $abbrevs{$addr4} and defined $abbrevs{$addr4}); Rob -Original Message

RE: Measure bandwidth for my site

2003-08-19 Thread Durick,James D.
I wanted to test the bandwidth for my website every 15 minutes (to verify my ISP was getting me 1.5 like they say)and was wondering if there are any modules that make the job easier. Any help would be appreciated. Currently, there are tools out there that do what I want but I wanted to write my ow

Re: Display realtime data As it changes in the databse - TK

2003-08-19 Thread Gabriel Cooper
Ramprasad A Padmanabhan wrote: Voodoo Raja wrote: Sorry for not posting it in the first place. Will this sub.. chew memory if I run it a number of times.. or does it overwrite it. sub read { print "\nreading data"; $db = DBI->connect("DBI:mysql:$dbase:$hostname", $username, $password); as Ra

Re: function to encode/decode url

2003-08-19 Thread Morbus Iff
>> Can anyone tell me where I can find encoding functions like >> encode("[EMAIL PROTECTED]") ==> ram%40yahoo.com >> and decode("ram%40yahoo.com") ==> [EMAIL PROTECTED] > >As usualy. See CPAN - http://search.cpan.org/ >Eg. CGI::Enurl + CGI::Deurl I prefer URI::Escape, myself. -- Morbus Iff ( i'm

Re: unexpected runtime error

2003-08-19 Thread Gary Stainburn
On Tuesday 19 Aug 2003 12:25 pm, Gary Stainburn wrote: > Hi folks, > > I'm getting: > > Use of uninitialized value in hash element at /home/gary/bin/svcimport line > 188, line 4301. > > when running my program, of which like 188 is: > > $addr4=$abbrevs{$addr4} if (defined $abbrevs{$addr4}); # ex

unexpected runtime error

2003-08-19 Thread Gary Stainburn
Hi folks, I'm getting: Use of uninitialized value in hash element at /home/gary/bin/svcimport line 188, line 4301. when running my program, of which like 188 is: $addr4=$abbrevs{$addr4} if (defined $abbrevs{$addr4}); # expand abbreviations Surely the 'if defined' should prevent this from

Re: function to encode/decode url

2003-08-19 Thread Jenda Krynicky
From: Ramprasad A Padmanabhan <[EMAIL PROTECTED]> > I know there must be a function to encode/decode urls > I was searching the LWP documentation but couldnt find any > > Can anyone tell me where I can find encoding functions like > > encode("[EMAIL PROTECTED]") ==> ram%40yahoo.com > > and decod

function to encode/decode url

2003-08-19 Thread Ramprasad A Padmanabhan
I know there must be a function to encode/decode urls I was searching the LWP documentation but couldnt find any Can anyone tell me where I can find encoding functions like encode("[EMAIL PROTECTED]") ==> ram%40yahoo.com and decode("ram%40yahoo.com") ==> [EMAIL PROTECTED] Thanks Ram -- To unsubs

Dates

2003-08-19 Thread Support
Thanks to all those who replied. I ended up doing some research myself and found a good date module at http://search.cpan.org/author/STBEY/Date-Pcalc-1.2 for those who are interested in juggling dates. Its called Date::Pcalc Cheers Colin -

Re: Display realtime data As it changes in the databse - TK

2003-08-19 Thread Ramprasad A Padmanabhan
Voodoo Raja wrote: Sorry for not posting it in the first place. Will this sub.. chew memory if I run it a number of times.. or does it overwrite it. sub read { print "\nreading data"; $db = DBI->connect("DBI:mysql:$dbase:$hostname", $username, $password); $query = $db->prepare("SELECT * FROM ca

RE: Regular expression help

2003-08-19 Thread EUROSPACE SZARINDAR
Hi Rob, You are totally right your exemple (' data11 '' dat"a12' 'data13') should raise an error and this is normal. I will nethertheless look carefully for the Text::CSV module. Thanks Michel -Message d'origine- De: Rob Anderson [mailto:[EMAIL PROTECTED] Date: lundi 18 août 200

Re: memoizing a variable

2003-08-19 Thread Jenda Krynicky
From: "John W. Krahn" <[EMAIL PROTECTED]> > Robert Citek wrote: > > I want a variable to be memoized, that is, keep the variable > > available only to the function and the value remembered across > > invocations. So far, I have created two versions listed below, both > > of which "work." The firs