checking existance of an item in an array

2006-02-06 Thread Konstantine
Greetings This is my first stab at Perl. Please be gentle :-) I have the following snippet which seems to do what I am trying to do, namely, check the url field value in a POST request, do a server redirect (as opposed to browser redirect) if the value is in safe_destinations array, redirect to

Re: checking existance of an item in an array

2006-02-06 Thread Ovid
--- Konstantine [EMAIL PROTECTED] wrote: Greetings This is my first stab at Perl. Please be gentle :-) I have the following snippet which seems to do what I am trying to do, namely, check the url field value in a POST request, do a server redirect (as opposed to browser redirect) if the

Preventing unauthorized use of a CGI script

2006-02-06 Thread David Gilden
Greetings, Just wanted hear opinions on how effective this is, as way of preventing email relaying stoping unauthorized use my script. This from a script that connects a form page to sendmail #!/usr/bin/perl use CGI qw/:standard/; #..snip.. my $referer = referer; # what page called

Win32::OLE for IIS

2006-02-06 Thread a b
Hello all, I have one require to modify the properties of IIS runing on remote machine. i tried it with Win32::OLE module but unsuccessful my code :- use strict; use Win32::OLE; use Win32::OLE::Enum; Win32::OLE-Option(Warn = 3); my $hostname = 'myremotehost'; my $rootkey ; my $Collection =

Re: On Focus

2006-02-06 Thread John Doe
On 2/5/06, Ron Smith wrote: Hi all, I've been looking for this all over, but can't seem to find a link. Is there a Perl or PerlScript equivalent to the JavaScript or vbscript on-focus function? If there is, could someone please, point me in the right direction. Omega -1911

Re: Duplicates elements in an array

2006-02-06 Thread John Doe
anand kumar am Montag, 6. Februar 2006 08.34: Hi all I have an array with hundreads of elements in it. Can anyone suggest the easiest way to keep only the duplicate elements in the array. Hi Anand Depends a bit if you want to keep all duplicates of a duplicate element or just

Gtk2::GladeXML on Windows: permission denied

2006-02-06 Thread Daniel Kasak
Hi all. I originally posted this to the Gtk2-Perl mailing list, but got a total of 0 answers ... I'm trying to do an install of a Gtk2-Perl setup on Windows 2000, but not getting anywhere :( I've installed Gtk2 binaries and Perl and all modules ( for Gtk2, using the latest Win32 binaries

dbm again

2006-02-06 Thread Anders Stegmann
Hi! Can anyone tell me why this script doesn't work? use strict; use warnings; my %hash = (); my $key1 = 'nul'; my $en = 'en'; my $to = 'to'; my $tre = 'tre'; $hash{$key1} = [$en, $to, $tre]; dbmopen(my %dbm_result_hash, 'hash_database', 0666) or die cannot save

Re: dbm again

2006-02-06 Thread John Doe
Anders Stegmann am Montag, 6. Februar 2006 12.30: Hi! Hi Anders Can anyone tell me why this script doesn't work? use strict; use warnings; my %hash = (); my $key1 = 'nul'; my $en = 'en'; my $to = 'to'; my $tre = 'tre'; $hash{$key1} = [$en, $to, $tre]; dbmopen(my

Fwd: Re: dbm again

2006-02-06 Thread Anders Stegmann
Anders Stegmann 02/06/06 1:02 pm Thaks for replying! The hash has only one key, so it sould be okay. I get the output: Can't use string (ARRAY(0x648290)) as an ARRAY ref while strict refs in use at testhash6.pl line 8. When I run the script. It seems like I am somehow dealing

regarding fd script

2006-02-06 Thread Nischitha
Hello All Can any one please tell what are fd script and how to run those script with example. when do we get this error : Wrong syntax (suid) fd script name Failure is the step for success. If you know you are failed it will be easy to climb step.

Re: Duplicates elements in an array

2006-02-06 Thread Jeff Pang
Do you want to keep the duplicate elements simply and don't mind the order of them? If I have understood for you correctly,I should write the code as below: use strict; use warnings; my @array = qw/aaa bbb ccc aaa ddd ddd aaa ccc bbb bbb/; my %hash; $hash{$_}++ for @array; my @duplicate = grep

Re: Gtk2::GladeXML on Windows: permission denied

2006-02-06 Thread Chas Owens
On 2/6/06, Daniel Kasak [EMAIL PROTECTED] wrote: snip If I run as administrator, or modify the profile of the user and make them an administrator, then the app works fine. Otherwise as a user, I simply can't load the Gtk2::GladeXML module. Any ideas? snip I think the fact above is why you are

Re: Gtk2::GladeXML on Windows: permission denied

2006-02-06 Thread Chas Owens
On 2/6/06, Chas Owens [EMAIL PROTECTED] wrote: On 2/6/06, Daniel Kasak [EMAIL PROTECTED] wrote: snip If I run as administrator, or modify the profile of the user and make them an administrator, then the app works fine. Otherwise as a user, I simply can't load the Gtk2::GladeXML module.

Re: Fwd: Re: dbm again

2006-02-06 Thread John Doe
Anders Stegmann 02/06/06 1:02 pm Thaks for replying! The hash has only one key, so it sould be okay. I get the output: Can't use string (ARRAY(0x648290)) as an ARRAY ref while strict refs in use at testhash6.pl line 8. When I run the script. It seems like I am somehow dealing with a

Re: Error in the postgres update

2006-02-06 Thread Chas Owens
When using the DBI it is best to either let the database handle quote the strings or use placeholders: database handle quoting: my $update = UPDATE tab SET foo = . $dbh-quote($foo_val) . WHERE bar = . $dbh-quote($bar_val); $dbh-do($update); place holders: my $sth = $dbh-prepare(UPDATE

Re: On Focus

2006-02-06 Thread Ron Smith
John, Thanks for the explanation. It's clarified things for me. I'll be searching CPAN for a solution, as you suggested. Thanks, again Ron John Doe [EMAIL PROTECTED] wrote: On 2/5/06, Ron Smith wrote: Hi all, I've been looking for this all over, but can't seem to find

regular expressions over multiple lines

2006-02-06 Thread Rimma Nayshulis
Hi, I've never used perl before, but was told that it's pretty powerful for text processing. Here's a problem I'm trying to solve: I have an expression, exp1 that I need to grep for recursively over a directory structure. If I find a match, I need to look at the matching file and find

Re: how to run perl file from a html page

2006-02-06 Thread a b
Hy all, I think i got the solution i am using perlscript @ client side in that webpage and i am able to got the params from user and able to execute some functions (with out any web server) Thanks for your help. a b On 2/3/06, JupiterHost.Net [EMAIL PROTECTED] wrote: a b wrote: Hy ,

Win32::OLE for IIS

2006-02-06 Thread a b
Hello all, I have one require to modify the properties of IIS runing on remote machine. i tried it with Win32::OLE module but unsuccessful my code :- use strict; use Win32::OLE; use Win32::OLE::Enum; Win32::OLE-Option(Warn = 3); my $hostname = 'myremotehost'; my $rootkey ; my