Re: help with defined and !not defined

2005-07-22 Thread lorid
Chris Wagner wrote: You want to check if it's null, not if it's defined. Defined means that the variable exists. You want something like if ($photo_year) {...}. At 01:48 PM 7/21/05 -0700, lorid wrote: my $ARGV[0] will sometimes be passed a string like this:nvIGRA with no date at end

Re: help with getting file stats

2005-07-22 Thread lorid
Eric Amick wrote: On Thu, 21 Jul 2005 12:05:08 -0700, you wrote: loris reply: yes I did try stat ($dir/$file) it would not work , and I tried many variation here is what I finally got to work: print Opening $dir \n; opendir DH, $dir or die Can't open the current dir $!\n; while(my

Re: help with getting file stats

2005-07-21 Thread lorid
-Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of lorid Sent: Wednesday, July 20, 2005 3:34 PM To: perl-win32-users Subject: help with getting file stats snip of loris code: ( $dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime

help with defined and !not defined

2005-07-21 Thread lorid
Im want to set the $photo_year and $photo_month to another value if it is not already set. my $ARGV[0] will sometimes be passed a string like this:nvIGRA with no date at end and sometimes with date nvIGRA200511 if it does not have date I need to set it another way but cant get syntax of

help with getting file stats

2005-07-20 Thread lorid
$file_ctr = 0; my $dir = /home/lorid/wrccpics; print Opening $dir \n; opendir DH, $dir or die Can't open the current dir $!\n; while($file = readdir(DH)){ if(-d $dir/$file){ print \n Dir: $file \n; $dir_ctr++; } elsif(-e $dir/$file){ print \nFile: $file \n

image map question

2005-07-14 Thread lorid
Can anyone tell me if I should be able to do both a onclick and a mouseover imagemap? I am only able to do one or the other. thanks Lori my attempt: map id=Compusmap name=Compusmap area shape=rect coords=67,14,113,51 alt=Northern View onclick=alert('north1');

security question on someones code

2005-07-11 Thread lorid
Just curious I found thisline in a sample perl program (which created a simple web page) line: delete @ENV{'BASH_ENV', 'CDPATH', 'ENV', 'IFS', 'PATH', 'SHELL'}; # For security. could someone tell me if I should include this on all web pages I create and if so why? thanks Lori

sample dbi \html for program

2005-06-10 Thread lorid
Does anyone have a very short sample program that presents a html form and gets the input and updates a database ? I usually do this in C, but would like to start doing in perl. thanks Lori ___ Perl-Win32-Users mailing list

Re: function named reset()

2005-04-07 Thread lorid
Chris Cappelletti wrote: There's no way that I'm going to take the name of every function I ever write and search the Perl docs to see if it's a reserved name. But don't you just get that feeling that maybe reset might be a fxn of note? You could always preface your

simple reg ex

2005-03-10 Thread lorid
I know this is perl not javascript, I thought I was good at deciphering reg ex but the 2nd line in this function has got me puzzled. Can anyone decipher: X = (!X ? 2 : X); function round(number,X) { // rounds number to X decimal places, defaults to 2 X = (!X ? 2 : X); return

Re: simple reg ex

2005-03-10 Thread lorid
sorry , I sent question too soon, long day. forgot about the conditional reg ex (test_value ? if_true : if_false) lori ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe:

question about Bills site

2004-09-09 Thread lorid
Hi Bill I just checked out you site and wonder what the cmd.exe is used for ? Lori ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

reg exp help please

2003-12-07 Thread lorid
Here is the string Im trying to split (its a cookie str) MadHatter Data: a:7:{i:0;s:19:\MadhatterSize=Adult\;i:1;s:20:\MadHatterColors=blue\;i:2;s:15:\MadHatter_Qty=1\;i:3;s:26:\product_name=Madhatter_Hat\;i:4;s:8:\cd_num=2\;i:5;s:4:\x=39\;i:6;s:4:\y=12\;} the data I want is

Re: proxy error and using LWP getstore

2003-11-16 Thread lorid
; ** $Bill Luebkert wrote: lorid wrote: Thanks Bill! Your code worked great, I tested it on a different url and it worked ! yeah, but it timed out on the page Im trying to get (Im working from home on a 56k modem) but it seems to get other pages just

Re: proxy error and using LWP getstore

2003-11-15 Thread lorid
. Ive got the rest working fine but was stuck on the proxy part... thanks again Lori $Bill Luebkert wrote: lorid wrote: I am still having trouble using the proxy, I thought I'd send my new code in which I hopefully used your code suggestions correctly. I can ping proxy-web.dri.edu , and I

Re: proxy error and using LWP getstore

2003-11-14 Thread lorid
(OUT, $src) or die Can't read file $src: $!\n; print Hi Lori\n; close OUT; close OUT2; $Bill Luebkert wrote: lorid wrote: Any docs or examples on how to use a proxy when using getstore will be greatly appreciated.! I am having trouble getting a html file from the web due to a proxy

Re: passing parms to subroutine

2003-10-29 Thread lorid
-BATCH Hope this helps ... jwm -Original Message- From: lorid [mailto:[EMAIL PROTECTED] Sent: October 29, 2003 14:31 To: perl users Subject: passing parms to subroutine Im used to subs in C or VB but this has me puzzled... I am trying to pass a scalar ref to a subroutine, When I try