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 or

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 Guttman; beginners

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

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

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 =

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

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:59 PM

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 for

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

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

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 ); foreach

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

Shopping cart image

Hello Can anymore give a source where I can download a free shopping cart image? I did some google search, but not successful. Most sites claim to have it for free, even though the do not. I Best Regards Babs

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 string;