RE: Strange behaviour while using DBI with binding

Normally I would expect a quoted string to represent one value, this is probably not true for DBI binding as you mentioned. Cheers => -Original Message- => From: Chas. Owens [mailto:chas.ow...@gmail.com] => Sent: 19 August 2010 13:22 => To: Babale Fongo => Cc: Uri Gut

RE: Strange behaviour while using DBI with binding

>From your last comments, I am not sure where this is leading to, but here is all I have to say. Below are 2 pieces of code. Both have been tested with space in the string and again without space. $limit = "$offset,$number_rows" or $limit = "$offset, $number_rows"; 1) This does not work (with

Calling Exit from within a subroutine

I call several subroutines within my program. The program is design in a way that I don't expect my subroutines to return to the caller but to exit once they have executed. At the moment I don't have exit or return at the end of my subroutines. mysub(); # will the sub return here? If yes wha

Win32 Module to change local Password on Remote Computers

Hi, I'm trying to programmatically change a local password on several Computers, but the Win32API::Net and Win32::NetAdmin modules seem not to be appropriate for that. Wondering whether there's any Win32 API module for that. I tried using the UserChangePassword function, and wasn't surprise it

RE: Compare file modification time

It was just an attempt to see how someone else may tackle this issue. I thought of sorting, but I wasn't sure it will do exactly what I expect. Here is what I've have so far: my $dir = "/mydir"; opendir(DH, "$dir") || die "Failed to open $dir: $!\n"; my $counter = 0; while (defined(my $file = r

RE: :SSH (How to split value returned by a system command)

It is a bit weird, but I could workaround it by first joining the value, and splitting it thereafter: @splitted = split /\s+/, join "", @found; Thanks anyway... ||-Original Message- ||From: Babale Fongo [mailto:[EMAIL PROTECTED] ||Sent: Wednesday, February 02, 2005 11:

Net::SSH (How to split value returned by a system command)

This is what I had: @found = remote_cmds ("find $remdir -name '*.zip'"); print "@found" look like this: /path/file1.zip /path/file2.zip /path/file3.zip @found is neither a list nor string, so it is not handy to deal with. In scalar context, the command returns 1 (true), in list context it r

RE: How does defined work?

Both Zero "0" and empty string " " are defined values in Perl, so if you want to test for values other than zero or empty string; then try something like thing: if ($nUserId) { # so "0", 0 or " " will fail here $juror_number = $nUserId; } else { die "No valid ID

RE: Regex to match valid host or dns names

Hi, My original regex to match ips is this: "$_ =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}/;", which is ok. But matching dns name is still a problem. K.Prabakar's suggestion looks good but also failed the test: "$_ =~ /^\w\w*-?\w+?[\.\w\w*-?\w+?]*$/", It will match an invalid dns name like this (host-

CGI.pm / Upload File / delete temporary file (CGITemp****)

You don't have to bother about deleting it. GCI.pm takes care of that. HTH || ||Hi All, || ||Been ages since I last posted to this list... || ||Anyhoo, I have a script which handles the uploading of a file. || ||It uses the CGI module to get the form params etc and open/read/close ||statemen

RE: Question about CPAN modules

I Jose (BMB) [mailto:[EMAIL PROTECTED] ||> Sent: Tuesday, May 04, 2004 12:54 PM ||> To: Babale Fongo; [EMAIL PROTECTED] ||> Subject: RE: Question about CPAN modules ||> ||> > -Original Message- ||> > From: Babale Fongo [mailto:[EMAIL PROTECTED] ||> > Sent: Mo

Question about CPAN modules

My program depends on some CPAN modules (e.g. Image::Magick, MD5::Digest) to operate, so I want to distribute it with those modules. How do I best redistribute module? Is it possible to pre-install modules (copy) in my program folder for distributed? Regard Babs

Regex to match domain for cookie

How do I match a domain name starting from the dot? # Match something like these ".domain4you.co.uk" ".domain-house.de" This is what I have: @domains = ("http://www.domain.com ", "http://www.domain4you.co.uk "http://www.domain-house.de"; "https//rrp.cash-day.com" ); f

Why is path to perl not included in modules?

I've realised that, most perl modules do not have #!/usr/bin/perl written on the first line. Does it implies - that modules don't need the perl interpreter to function? Thanks

if-else-statemnet question

Hello Below is a portion of a script that displays a table. The argument passed by param() determines the number of rows the table should display. For some unknown reason, the value of param() seem to behave strangely. It at times the value does not change; even if a different number is sent as

Why "Global symbol require explicit package name"

Hello guy! I would like to know why I need to declare global variables with "my". My script looks something like thing: Use strict; $strg = "A string"; $strg2 = "a second string"; I get a warning: "Global symbol require explicit package name." unless I declare the variables like: my $strg = "A