[16060] in Perl-Users-Digest
Perl-Users Digest, Issue: 3472 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jun 24 14:05:28 2000
Date: Sat, 24 Jun 2000 11:05:10 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <961869910-v9-i3472@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 24 Jun 2000 Volume: 9 Number: 3472
Today's topics:
Re: 'each' problem in DESTORY on a tied hash <rootbeer@redcat.com>
Re: Archive::Tar and memory limits <rootbeer@redcat.com>
Can mod_perl pooled db connections be attached to http kwiateks@juno.com
Can't Run ADO. Permissions? bayers@my-deja.com
Re: Can't Use OLE bayers@my-deja.com
Re: Can't Use OLE bayers@my-deja.com
Re: cgi/SSI question... <richh@panola.com>
Re: cgi/SSI question... (brian d foy)
filehandle <-> filename <andreywNOanSPAM@altavista.net.invalid>
Forms.. <dellison@offworld.yi.org>
Re: Forms.. <justin@lolofie.com>
Getting Perl CGI Script To Get Me Back To Main Html Pag <mikes@escape.com>
Re: Getting Perl CGI Script To Get Me Back To Main Html <bg@skypoint.com>
Re: how to get part of a large html file <rootbeer@redcat.com>
Re: IO::Socket::INET forking server problem (Elliot Finley)
MLDBM Problem and Fix fxia@yahoo.com
Re: NT or Unix at runtime <lwaibel@cwia.com>
Re: Perl -> AT unix scheduler ? (Gwyn Judd)
Perl SSLeay Libraries for SCO <Bill@net.net>
Re: Running Perl CGI Scripts <mikes@escape.com>
Re: Running Perl CGI Scripts <rootbeer@redcat.com>
Re: Simple brain picker (Gwyn Judd)
Re: Using cgi-lib.pl to upload a file <rootbeer@redcat.com>
visit new FORUM all u queastion will be answered (atlea http404040404@my-deja.com
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 24 Jun 2000 09:36:25 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: 'each' problem in DESTORY on a tied hash
Message-Id: <Pine.GSO.4.10.10006240929090.23149-100000@user2.teleport.com>
On 24 Jun 2000, Josiah Bryan wrote:
> It seems that the each statment is not finding any keys in the said
> hash. Yet, there are keys in it and I have tested it using the each
> statment on the tied variable.
If what you say is correct, you've found a serious bug in Perl. So let's
hope that you're mistaken. :-)
> while (($x,$y) = each %{ $self->{TABLES}->{$a} }) { #####
Let's put a test above that line. Try putting these lines just before that
while loop.
my $hash_size = keys %{ $self->{TABLES}->{$a} };
warn "## Destroying $self: $hash_size keys";
That should tell you how many keys you really have in that hash. If it's
not what you expected, maybe you can tinker with the code to find out
what's going on.
If it seems to be doing the wrong thing, cut down your code to make a
small, self-contained example program which shows the behavior. When you
post that, someone else should be able to find the problem.
> flock(F, 8) if ($LOCK);
Unless you know all about Perl's internal buffering, don't explicitly
release a file lock. Just close the file.
Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 24 Jun 2000 09:26:33 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Archive::Tar and memory limits
Message-Id: <Pine.GSO.4.10.10006240921430.23149-100000@user2.teleport.com>
On Fri, 23 Jun 2000 jgrinwal@my-deja.com wrote:
> I am looking for a way to check memory resources after Tar->read(before
> Tar->add_files)and flush the in-memory archive if memory utilization is
> over 80 percent.
Well, there's no way in normal Perl code to check for memory. Like a
Turing machine, Perl assumes there's always more when you need it. :-)
There should perhaps be something in Archive::Tar which could alleviate
this problem. For example, it could use a scratch file when it's internal
buffer starts to get large. Using a tied variable would minimize the
changes needed to existing code, I speculate without looking at the
source.
If you make this suggestion to the module's author, it may come to pass.
It'll be even more likely if you include a patch. :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 24 Jun 2000 16:03:26 GMT
From: kwiateks@juno.com
Subject: Can mod_perl pooled db connections be attached to http session?
Message-Id: <8j2m46$36$1@nnrp1.deja.com>
Hello
Does anyone have resources for perl code that will pool db
(oracle) connections and allow me to attach the connection handle to one
(and only one) http user session?
Please post and/or email me at kwiateks@juno.com
Thanks,
Keith
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 24 Jun 2000 15:59:13 GMT
From: bayers@my-deja.com
Subject: Can't Run ADO. Permissions?
Message-Id: <8j2lsb$vvn$1@nnrp1.deja.com>
When I run the script below via my browser, I get:
"Can't call method "EOF" on an undefined value at
W:\Inetpub\wwwroot\cgi-bin\test.plx line 11."
It runs fine from the command line using perl.exe, but not via IIS4's
'perlIS.dll' or 'perl.exe %s %s'. Other scripts, those that don't use
ADO work via CGI.
I've tried using sa as the user so that it would have full permissions
for the DB. It didn't work either.
It used to work. I can't figure out what happened or how to fix it.
Could it be a permissions problem? A setting in IIS4? A broken DLL?
Where would I start? I'm using 5.22 on NT4 and SQL Server 6.5.
Thanks in advace.
==================================================
use CGI::Carp qw/ fatalsToBrowser /;
use Win32::OLE;
$Conn = CreateObject Win32::OLE "ADODB.Connection";
$Conn->Open("DSN=MSSQL;UID=user;PWD=password");
$Conn->Open("MSSQL");
print "Content-type: text/html\n\n";
$RS1 = $Conn->Execute("SELECT * FROM SIS WHERE STUDENT_ID='600703639'");
if(!$RS1->EOF) {
$data{'name'} = $RS1->Fields('NAME')->value;
}
print qq{Test 2 $data{'name'}};
$RS1->Close;
$Conn->Close;
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 24 Jun 2000 13:44:53 GMT
From: bayers@my-deja.com
Subject: Re: Can't Use OLE
Message-Id: <8j2e0j$qlc$1@nnrp1.deja.com>
In PerlIS-Err.log I get the message:
INTERNAL ERROR: Perl Parse did not exit clean.
I'm going to install 5.005 and see what happens.
In article <8j0f2t$h02$1@nnrp1.deja.com>,
bayers@my-deja.com wrote:
> Hmmm
>
> use CGI::Carp qw/ fatalsToBrowser /;
> #use Win32::OLE;
> print "Content-type: text/html\n\n";
> print "i";
>
> works, but:
>
> use CGI::Carp qw/ fatalsToBrowser /;
> use Win32::OLE;
> print "Content-type: text/html\n\n";
> print "i";
>
> gives me the same message I've gotten since the problem started:
>
> 'W:\Inetpub\wwwroot\cgi-bin\test.plx' script produced no output
>
> In article <Pine.GSO.4.10.10006231042540.10836-
> 100000@user2.teleport.com>,
> Tom Phoenix <rootbeer@redcat.com> wrote:
> > On Fri, 23 Jun 2000 bayers@my-deja.com wrote:
> >
> > > Newsgroups: comp.lang.perl.misc, comp.lang.perl.module
> >
> > Perhaps you meant "comp.lang.perl.modules" there.
> >
> > > This bit of cgi code crashes. It's in a plx file:
> > >
> > > use Win32::OLE;
> > > print "Content-type: text/html\n\n";
> > > print "i";
> >
> > Well, that's not HTML! But that's a quibble. Maybe you can make this
> one
> > work to tell you something. It won't produce valid HTML either. :-)
> >
> > use CGI::Carp qw/ fatalsToBrowser /;
> > use Win32::OLE;
> >
> > --
> > Tom Phoenix Perl Training and Hacking Esperanto
> > Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
> >
> >
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 24 Jun 2000 14:38:23 GMT
From: bayers@my-deja.com
Subject: Re: Can't Use OLE
Message-Id: <8j2h4v$sps$1@nnrp1.deja.com>
Ahhh, I found the problem.
The IIS4 service was running as I tried to install perl. As users
would access the website, they would tie up certain files, perl's OLE
library for one.
I shut down the IIS service and perl installed fine.
Now if I can just get ADO to work again. It works from the command
line but not if I use perlIS.exe.
- Jim
In article <8j0f2t$h02$1@nnrp1.deja.com>,
bayers@my-deja.com wrote:
> Hmmm
>
> use CGI::Carp qw/ fatalsToBrowser /;
> #use Win32::OLE;
> print "Content-type: text/html\n\n";
> print "i";
>
> works, but:
>
> use CGI::Carp qw/ fatalsToBrowser /;
> use Win32::OLE;
> print "Content-type: text/html\n\n";
> print "i";
>
> gives me the same message I've gotten since the problem started:
>
> 'W:\Inetpub\wwwroot\cgi-bin\test.plx' script produced no output
>
> In article <Pine.GSO.4.10.10006231042540.10836-
> 100000@user2.teleport.com>,
> Tom Phoenix <rootbeer@redcat.com> wrote:
> > On Fri, 23 Jun 2000 bayers@my-deja.com wrote:
> >
> > > Newsgroups: comp.lang.perl.misc, comp.lang.perl.module
> >
> > Perhaps you meant "comp.lang.perl.modules" there.
> >
> > > This bit of cgi code crashes. It's in a plx file:
> > >
> > > use Win32::OLE;
> > > print "Content-type: text/html\n\n";
> > > print "i";
> >
> > Well, that's not HTML! But that's a quibble. Maybe you can make this
> one
> > work to tell you something. It won't produce valid HTML either. :-)
> >
> > use CGI::Carp qw/ fatalsToBrowser /;
> > use Win32::OLE;
> >
> > --
> > Tom Phoenix Perl Training and Hacking Esperanto
> > Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
> >
> >
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 24 Jun 2000 09:00:20 -0500
From: "Rich H" <richh@panola.com>
Subject: Re: cgi/SSI question...
Message-Id: <sl9frbp7e7f49@corp.supernews.com>
Alan J. Flavell <flavell@mail.cern.ch> wrote in message
news:Pine.GHP.4.21.0006241235190.13905-100000@hpplus03.cern.ch...
>
> On Fri, 23 Jun 2000, Rich H added another specimen of upside-down
> posting to the Usenet Hall of Shame with this:
>
> > If <!--#include virtual="/cgi-bin/whatever.cgi" --> doesn't work, try
> > <!--#exec cgi="/cgi-bin/whatever.cgi" -->
>
> SSI is not standardised, so don't just "try this" at random - consult
> the SSI documentation for the http server that you use, and then seek
> advice on a group where it is on-topic.
>
> > > Before you buy.
>
> Er, no thanks.
>
Since when did this become comp.lang.perl.strict. What's the use of having
perl on your site if you can't get it to work. This mans question may have
been a little off topic but not far enough that it didn't deserve an answer.
> SSI is not standardised, so don't just "try this" at random - consult
> the SSI documentation for the http server that you use, and then seek
> advice on a group where it is on-topic.
I wasn't telling him to try things at random. You can use both methods to
call scripts but the include virtual method does not always work. Not all
servers allow the exec ssi, for security reasons, so it's always best to try
include virtual first.
>consult the SSI documentation for the http server that you use
Good answer! We'll do away with all discussion groups and save tons of
bandwidth daily. If anyone has a question about ANYTHING, just consult the
documentation.
Which is worse, the original slightly off-topic post, or you absolutely
meaningless , bandwidth wasting post which was better suited for
comp.lang.arrogant.BS (which you should probably get back to moderating)?
Er, Have A Nice Day
------------------------------
Date: Sat, 24 Jun 2000 11:07:43 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: cgi/SSI question...
Message-Id: <brian-ya02408000R2406001107430001@news.panix.com>
In article <sl9frbp7e7f49@corp.supernews.com>, "Rich H" <richh@panola.com> posted:
> Alan J. Flavell <flavell@mail.cern.ch> wrote in message
> news:Pine.GHP.4.21.0006241235190.13905-100000@hpplus03.cern.ch...
> >
> > On Fri, 23 Jun 2000, Rich H added another specimen of upside-down
> > posting to the Usenet Hall of Shame with this:
> >
> > > If <!--#include virtual="/cgi-bin/whatever.cgi" --> doesn't work, try
> > > <!--#exec cgi="/cgi-bin/whatever.cgi" -->
> > SSI is not standardised, so don't just "try this" at random - consult
> > the SSI documentation for the http server that you use, and then seek
> Since when did this become comp.lang.perl.strict. What's the use of having
> perl on your site if you can't get it to work. This mans question may have
> been a little off topic but not far enough that it didn't deserve an answer.
you have the best answer possible. Each server is a bit different
with their SSI handling. there isn't one answer (any more). rather
than guess, just read the documentation. furthermore, rather than
giving an answer which might not be correct for a particular server,
point the OP at the documentation.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Mongers <URL:http://www.perl.org/>
------------------------------
Date: Fri, 23 Jun 2000 07:44:19 -0700
From: andreyw <andreywNOanSPAM@altavista.net.invalid>
Subject: filehandle <-> filename
Message-Id: <10d173b5.ef3ac927@usw-ex0101-008.remarq.com>
I have a filehandle (as a subroutine parameter).
Is there a way to know a filename or other disk file id.
Thanks.
Andrey
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Sat, 24 Jun 2000 17:58:44 +0000
From: "D.Ellison" <dellison@offworld.yi.org>
Subject: Forms..
Message-Id: <8j2pdq$727$1@apple.news.easynet.net>
Hi, Does anyone have a simple perl script that appends to a file from a
WWW form. That works under MS without much fuss?
Cheers Dave.
------------------------------
Date: Sat, 24 Jun 2000 10:06:46 -0700
From: "Justin" <justin@lolofie.com>
Subject: Re: Forms..
Message-Id: <sl9qklc0jev15@corp.supernews.com>
START>Programs>ActivePerl>Online Documentation
Read the CGI docs, it should take only about 5 minutes to learn how to do
what you want to do. If there is no CGI link, you need to install CGI, go
to a dos prompt and type "ppm install CGI". That easy.
D.Ellison <dellison@offworld.yi.org> wrote in message
news:8j2pdq$727$1@apple.news.easynet.net...
> Hi, Does anyone have a simple perl script that appends to a file from a
> WWW form. That works under MS without much fuss?
>
> Cheers Dave.
>
>
------------------------------
Date: Sat, 24 Jun 2000 11:03:55 -0400
From: mike <mikes@escape.com>
Subject: Getting Perl CGI Script To Get Me Back To Main Html Page
Message-Id: <3954CDDB.116A9177@escape.com>
Hi,
I have been practicing learning some Perl CGI scripting. When
I execute the scripts, my browser takes me to the /cgi-bin page
to execute the Perl script. How can use Perl to tell the browser
to go back to the main, initial html page, index.html for example,
that it started on?
Thanks
Mike
------------------------------
Date: Sat, 24 Jun 2000 10:57:40 -0500
From: "Barry Grupe" <bg@skypoint.com>
Subject: Re: Getting Perl CGI Script To Get Me Back To Main Html Page
Message-Id: <8j2lsq$14vb$1@shadow.skypoint.net>
"mike" <mikes@escape.com> wrote in message
news:3954CDDB.116A9177@escape.com...
> Hi,
> I have been practicing learning some Perl CGI scripting. When
> I execute the scripts, my browser takes me to the /cgi-bin page
> to execute the Perl script. How can use Perl to tell the browser
> to go back to the main, initial html page, index.html for example,
> that it started on?
Depends. meta tags are probably what you need in a generated page, or you
could simply have the script read the homepage and display it, depending on
what (the script) does.
Try comp.infosystems.www.authoring.cgi for more appropriate information.
This isn't the most appropriate group for CGI questions.
------------------------------
Date: Sat, 24 Jun 2000 09:39:36 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: how to get part of a large html file
Message-Id: <Pine.GSO.4.10.10006240936340.23149-100000@user2.teleport.com>
On Sat, 24 Jun 2000, Huang Kai wrote:
> I wish exampels for how to get part of a large html file.
Maybe you want seek(), documented in the perlfunc manpage. If that's not
it, perhaps you should tell us how far you've gotten and what you're
trying to do.
> or resume operation for html download.
See the specs for the protocol you're using to download to learn how to do
this. If there's a module which implements that protocol for perl, its
docs may address this issue.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 24 Jun 2000 17:47:13 GMT
From: efinley@efinley.com (Elliot Finley)
Subject: Re: IO::Socket::INET forking server problem
Message-Id: <3954f3e1.44874766@news.firstworld.net>
On Fri, 23 Jun 2000 22:13:00 GMT, nawkboy@my-deja.com wrote:
>My forking perl server is configured to listen to port 2400. Although
>clients can successfully interact with the server, the socket
>connections and forked processes are not being closed properly. This
>is evidenced by the output from netstat and ps. Unfortunately, I do
>not understand the problem well enough to diagnosis it. I have tried
>to give enough information below that someone more familar with
>writting servers in perl will be able to quickly see what is wrong.
Your bound sockets will hang around for a while if you have reuse=1...
Which you do. It's not a problem, it's more efficient that way.
>
>Any help will be greatly appreciated. I am intending to read "An
>Advanced 4.4BSD Interprocess Communication Tutorial" this weekend in
>the hopes of gaining greater insight into the problem.
>
>
>-----Connection example------(ERROR is a valid response is this context)
>$ telnet nigel 2400
>Trying 10.10.0.106...
>Connected to nigel.
>Escape character is '^]'.
>hi
>ERROR
>quit
>Connection closed by foreign host.
>$
>
>------------netstat -a|grep 2400---------------
>--After connecting and disconnecting several times------
> *.2400 *.* 0 0 0 0
>LISTEN
>nigel.2400 nigel.33359 32768 0 32768 0
>TIME_WAIT
>nigel.2400 nigel.33361 32768 0 32768 0
>TIME_WAIT
>nigel.2400 nigel.33362 32768 0 32768 0
>TIME_WAIT
>
>--While one client is connected--------
> *.2400 *.* 0 0 0 0
>LISTEN
> *.2400 *.* 0 0 8576 0
>BOUND
>nigel.2400 nigel.33361 32768 0 32768 0
>TIME_WAIT
>nigel.2400 nigel.33362 32768 0 32768 0
>TIME_WAIT
>nigel.33368 nigel.2400 32768 0 32768 0
>ESTABLISHED
>nigel.2400 nigel.33368 32768 0 32768 0
>ESTABLISHED
>
>-No one is connected and server has been running for a few minutes--
>
> *.2400 *.* 0 0 0 0
>LISTEN
> *.2400 *.* 0 0 8576 0
>BOUND
> *.2400 *.* 0 0 8576 0
>BOUND
> *.2400 *.* 0 0 8576 0
>BOUND
>nigel.2400 nigel.33368 32768 0 32768 0
>TIME_WAIT
>
>----ps -ef|grep t22----------
> sirsi 12110 4178 0 15:02:59 pts/2 0:00 perl -Mblib
>t/t22_run_server
> sirsi 12112 12110 0 15:03:07 pts/2 0:00 perl -Mblib
>t/t22_run_server
> sirsi 12414 11543 0 15:13:48 pts/5 0:00 grep t22
> sirsi 12270 12143 0 15:08:51 pts/2 0:00 perl -Mblib
>t/t22_run_server
> sirsi 12135 12112 0 15:05:52 pts/2 0:00 perl -Mblib
>t/t22_run_server
> sirsi 12143 12135 0 15:06:04 pts/2 0:00 perl -Mblib
>t/t22_run_server
>
>
>-------------------Relevant Code Section--------------------------------
--
Elliot (efinley@efinley.com) Weird Science!
ICQ# 77135295
------------------------------
Date: Sat, 24 Jun 2000 15:50:11 GMT
From: fxia@yahoo.com
To: gsar@umich.edu
Subject: MLDBM Problem and Fix
Message-Id: <8j2lbf$vkm$1@nnrp1.deja.com>
I have noticed that MLDBM uses an import sub that does not put its
own globals into the caller package. For example, if some code
calls 'use MLDBM qw(DB_File)', and some other code afterwards calls
'use MLDBM qw(GDBM_File)', the previous will get overwritten and
all subsequent ties using MLDBM will use GDBM_File as the underlying
DBM package. This causes serious 'panic: POPSTACK' problem for me.
I believe in general it will for anyone because you wouldn't know
how all the packages internally may use MLDBM with what DBM package.
The fix seems to be the use or caller package name to qualify its
globals as in a normap import sub. I wonder if there is already
such a fix or any better solutions. Thanks.
Fred Xia
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 24 Jun 2000 08:07:56 PDT
From: Larry R. Waibel <lwaibel@cwia.com>
Subject: Re: NT or Unix at runtime
Message-Id: <VA.0000003b.1e2632b4@cwia.com>
In article <8isngh$ofq$1@bcrkh13.ca.nortel.com>, Brandon Metcalf wrote:
> > But that would mean that all the client users would have to install Perl as
> > well and ClearCase. Using what comes with it means the triggers will work
> > since it's already installed.
>
> Err... nfs, nt shares...
>
Even those mean something else that has to be setup on the client (at least a
drive mapping involve a drive letter that, no matter which we choose someone may
be using for something else). A few individual setups may not be a problem;
hundreds or thousands sure would <sigh>.
------------------------------
Date: Sat, 24 Jun 2000 15:04:06 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Perl -> AT unix scheduler ?
Message-Id: <slrn8l9jf5.6l8.tjla@thislove.dyndns.org>
I was shocked! How could fperkins@my-deja.com <fperkins@my-deja.com>
say such a terrible thing:
>Goal: Im trying to start a shell script via a perl script that will be
>kicked off in the browser.
>
>Scenario: In simpliest form, I have:
>
>#!/usr/local/bin/perl
>
>print "Content-type: text/html\n\n";
>$test = `at now < /local/home/admin/migrate/18.sh`;
>print "$test<br>\n";
>print "Done<br>\n";
>exit;
>
>Problem: The shell script, 18.sh, is never started. In the browser, I
>get "Done" returned to me with nothing printed in the $test var. I
>played around with the at line to include | at now "+ 1 hour" | so at
>least I can see if the job is scheduled, but when doing an "at -l", I
>see no jobs scheduled.
I think the reason $test has nothing in it is that the shell escape
backticks `` only return the standard output from the command, not the
standard error. On my system at least 'at' gives it's response on the
standard error. As does sh if for example it cannot find the command you
want it to execute. Maybe you don't have 'at' in your path? Try this to
get the output from standard error:
$test = `at now < /local/home/admin/migrate/18.sh 2>&1`;
>When running the script from the shell, it works fine ie ./test.cgi
>
>What am I doing wrong? This seems so simple, but it just won't work.
>I have the 18.sh set at 755. Im guessing it's something with
>permissions...
...or paths
Hope That Helped.
--
Gwyn Judd (tjla@guvfybir.qlaqaf.bet)
My return address is rot13'ed
The fact that it works is immaterial.
-- L. Ogborn
------------------------------
Date: Sat, 24 Jun 2000 12:41:24 -0400
From: "Bill" <Bill@net.net>
Subject: Perl SSLeay Libraries for SCO
Message-Id: <3954e48b_1@spamkiller.newsfeeds.com>
Does anyone know of the existence of PERL SSLeay libraries for SCO Open
Server?
------------------------------
Date: Sat, 24 Jun 2000 10:01:34 -0400
From: mike <mikes@escape.com>
Subject: Re: Running Perl CGI Scripts
Message-Id: <3954BF3E.485CDB9C@escape.com>
Miles Davenport wrote:
> Check your process table, and see what apache is running as:
Hi Mike,
what is the purpose of checking my process tables
to see what apache is running as? I'm not sure what that means.
What will I get out of the process table to be able to help with
running the Perl scripts?
Thanks
Mike
------------------------------
Date: Sat, 24 Jun 2000 09:17:40 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Running Perl CGI Scripts
Message-Id: <Pine.GSO.4.10.10006240915560.23149-100000@user2.teleport.com>
On Sat, 24 Jun 2000, Miles Davenport wrote:
> Go to the directory you are trying to write to:
>
> Use chmod to change the permissions for the directory.
>
> chmod a+wr directoryName will allow read/write to all (a) users.
Of course, this may cause a major security problem, too. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 24 Jun 2000 15:29:11 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Simple brain picker
Message-Id: <slrn8l9ku4.6l8.tjla@thislove.dyndns.org>
I was shocked! How could Tom Briles <sariq@texas.net>
say such a terrible thing:
>Abe Timmerman wrote:
>>
>> On Wed, 21 Jun 2000 04:46:24 GMT, Igor Mack <sushi38@my-deja.com> wrote:
>>
>> > What is the most proper way of doing this:
>> >
>> > $first_five = substr($serialno, 3, 3);
>> > $version = substr($first_five, 0, 1) . "." . substr($first_five, 1, 2) ;
>>
>> $version = join '.', (unpack "A3A1A2", $serialno)[1,2];
>>
>> It leaves out the strange varname :-)
>
>($version=$serialno)=~s/...(.)(..).*/$1.$2/;
>
>I'd issue a golf challenge, but my game wouldn't even qualify for the
>perl.buy.com tour - and there are P(erl)(L)PGA pros in these parts.
hmm how about:
$version=join'.',$serialno=~/...(.)(..)/;
saves three strokes. I am not sure if this is exactly equivalent to
the original in the case of (say) a newline in the string. Maybe:
$version=join'.',$serialno=~/...(.)(..)/s;
would be better at the cost of a stroke. Although I am not sure if it
wouldn't be okay to assume there were no newlines in the string.
--
Gwyn Judd (tjla@guvfybir.qlaqaf.bet)
My return address is rot13'ed
This fortune intentionally not included.
------------------------------
Date: Sat, 24 Jun 2000 09:27:31 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Using cgi-lib.pl to upload a file
Message-Id: <Pine.GSO.4.10.10006240926420.23149-100000@user2.teleport.com>
On Fri, 23 Jun 2000, cdillis wrote:
> Everything works fine when a user enters a file to upload,
> but cgi-lib.pl crashes when the user does not enter a file.
Perhaps you should use the CGI module instead of cgi-lib.pl. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 24 Jun 2000 16:30:07 GMT
From: http404040404@my-deja.com
Subject: visit new FORUM all u queastion will be answered (atleast we will do our best)
Message-Id: <8j2nm1$18o$1@nnrp1.deja.com>
visit new FORUM all u queastion will be answered (atleast we will do
our best)
i've just finished working at setting it up, and now ppl come and
see/ask/find
ok it's here:
http://v13.virtualave.net/
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 3472
**************************************
