How to use sub directories in IIS and Apache HTTPD

2005-02-05 Thread Siegfried Heintze
When I try to employ subdirectories my perl cgi programs stop working. This is because the use statements cannot find their files. I could convert the use evidence_db; statements to require '../evidence_db.pm'; and that works. But this is painful. Surely there is an easier way. I thought of

Fwd: RE: configuration steps for perl with apache to support cgi-file

2005-02-05 Thread vishwas bhakit
hello I had configured httpd.conf to support cgi files. When i am trying to run cgi files it is giving Forbidden you don't have access to this server. What may be the cause. Can anybody help me. It's an urgency. Thnx in advance Yahoo! India Matrimony: Find your life partner

Re: Variable-sized hash of booleans

2005-02-05 Thread Randal L. Schwartz
Errin == Errin M HMMA/IT Larsen [EMAIL PROTECTED] writes: Errin And furthermore, I will assume that the values in the hash are boolean Errin (i.e. '1' (ones) or '0' (zeros)). Now, I want to see if the WHOLE hash Errin is true, this being defined as every key having a value of '1'. A bit of

Re: file and dir time stamps

2005-02-05 Thread MAC OS X
A great man once said: use file::finder; # from the CPAN unlink file::finder-atime('+30')-in(glob /share_folder/user_*); -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See

Re: file and dir time stamps

2005-02-05 Thread Randal L. Schwartz
MAC == MAC OS X @ Rocteur CC [EMAIL PROTECTED] writes: MAC http://www.rocteur.cc/geeklog/public_html/article.php? MAC story=20040318182126104query=file::finder Thanks for the publicity, but please please please fix the capitalization! Your code won't work, because it's called File::Finder, not

reading an integer value from file?

2005-02-05 Thread pablo wablo
I'm trying to parse an avi header and I'm having problems getting the actual values of the integer data in the file. Here's what I do: open(INHANDLE, tesmovie.avi.mp3) || die(can't open file); my $line = INHANDLE; my $datarate = substr($line, 4, 4) - 0; print $datarate\n; What I'm trying to