[17348] in Perl-Users-Digest
Perl-Users Digest, Issue: 4770 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Oct 31 00:10:34 2000
Date: Mon, 30 Oct 2000 21:10:15 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <972969014-v9-i4770@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 30 Oct 2000 Volume: 9 Number: 4770
Today's topics:
Re: system command (Doug McLaren)
Re: system command (Tom Christiansen)
Tom's perlman utility ? <elephant@squirrelgroup.com>
Re: Tom's perlman utility ? (Tom Christiansen)
Re: Tom's perlman utility ? <elephant@squirrelgroup.com>
Re: Tom's perlman utility ? (Tom Christiansen)
Re: Unterminated <> operator? what the heck? (Colin Watson)
Re: Using 'format' and 'write' multiple times? (Gwyn Judd)
Re: What about CGI.pm? <jeff@vpservices.com>
Re: What should I do? <mtaylorlrim@my-deja.com>
Re: What should I do? <ryanc@nci1.net>
Re: Which is the best PERL learning book? <joe+usenet@sunstarsys.com>
Re: Which is the best PERL learning book? <uri@sysarch.com>
Re: Win32::IpHelp <carvdawg@patriot.net>
Re: Working with time (Chris Fedde)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 30 Oct 2000 19:56:19 GMT
From: dougmc@frenzy.com (Doug McLaren)
Subject: Re: system command
Message-Id: <DnkL5.24453$Fe4.632581@typhoon.austin.rr.com>
In article <m366n1aa27.fsf@dhcp11-177.support.tivoli.com>,
Ren Maddox <ren.maddox@tivoli.com> wrote:
| > `perl rss2html.pl $urlsource > myfile.html`;
...
| In that case:
|
| system("perl rss2html.pl $urlsource > myfile.html");
|
| should also work. The difference is what happens with the output of
| rss2html.pl -- with the backticks, it gets thrown away (unless you
| save it by assigning it to something), while with system(), it goes to
| STDOUT. If the script doesn't produce any output, then this
| difference is irrelevant.
Actually, there is at least one other difference between -
`perl rss2html.pl $urlsource > myfile.html`;
and
system("perl rss2html.pl $urlsource > myfile.html");
... if this script is running on one's console and they ^C it, in the
first case the both the parent and the child program will get the
SIGINT sent to them, and in the second case only the child program
will get the SIGINT.
--
Doug McLaren, dougmc@frenzy.com
`Commit a crime. When the police come over to dust for fingerprints have them
dust the rest of the house too. You might go to jail, but it beats dusting.'
- Ken's Deep Thoughts
------------------------------
Date: 30 Oct 2000 21:34:35 -0700
From: tchrist@perl.com (Tom Christiansen)
Subject: Re: system command
Message-Id: <39fe4bdb@cs.colorado.edu>
In article <DnkL5.24453$Fe4.632581@typhoon.austin.rr.com>,
Doug McLaren <dougmc@frenzy.com> wrote:
>Actually, there is at least one other difference between -
> `perl rss2html.pl $urlsource > myfile.html`;
>and
> system("perl rss2html.pl $urlsource > myfile.html");
>
>... if this script is running on one's console and they ^C it, in the
>first case the both the parent and the child program will get the
>SIGINT sent to them, and in the second case only the child program
>will get the SIGINT.
Eh? Of course the foregrounded job will have all members of its
process group receive a SIGINT if ^C (or, more correctly stated,
whatever your interrupt character should happen to be) is typed on
the controlling tty. This is true no matter what. It is also true,
however, that both system() and backticks ignore SIGINT in the
parent, so it appears as though they never "get" the signal. But
these both work the same way.
--tom
------------------------------
Date: Tue, 31 Oct 2000 14:11:05 +1100
From: jason <elephant@squirrelgroup.com>
Subject: Tom's perlman utility ?
Message-Id: <MPG.1468e3564791d76b98986c@localhost>
anyone (Tom?) know what stage Tom's perlman utility is up to ? .. I
grabbed an early alpha that didn't seem complete and have only now come
around to thinking about it all again
--
jason -- elephant@squirrelgroup.com --
------------------------------
Date: 30 Oct 2000 20:29:57 -0700
From: tchrist@perl.com (Tom Christiansen)
Subject: Re: Tom's perlman utility ?
Message-Id: <39fe3cb5@cs.colorado.edu>
In article <MPG.1468e3564791d76b98986c@localhost>,
jason <elephant@squirrelgroup.com> wrote:
>anyone (Tom?) know what stage Tom's perlman utility is up to ? .. I
>grabbed an early alpha that didn't seem complete and have only now come
>around to thinking about it all again
Functionally, at least to my mind and I've heard nothing to the
contrary, it was "complete". There was, however, work to be done
on better/complete documentation and platform testing. The tarball
contains symlinks, which are only supported on non-legacy file
systems. This proved the greatest hardship for people. For some
reason, they didn't catch on to the fact that the "FOO" symlink was
just a shortcut for "perlman FOO", so never went any further than
that.
The tarball is where it always was.
--tom
------------------------------
Date: Tue, 31 Oct 2000 15:12:04 +1100
From: jason <elephant@squirrelgroup.com>
Subject: Re: Tom's perlman utility ?
Message-Id: <MPG.1468f1a1bcfdf7a1989870@localhost>
Tom Christiansen wrote ..
>In article <MPG.1468e3564791d76b98986c@localhost>,
>jason <elephant@squirrelgroup.com> wrote:
>>anyone (Tom?) know what stage Tom's perlman utility is up to ? .. I
>>grabbed an early alpha that didn't seem complete and have only now come
>>around to thinking about it all again
>
>Functionally, at least to my mind and I've heard nothing to the
>contrary, it was "complete". There was, however, work to be done
>on better/complete documentation and platform testing. The tarball
>contains symlinks, which are only supported on non-legacy file
>systems. This proved the greatest hardship for people. For some
>reason, they didn't catch on to the fact that the "FOO" symlink was
>just a shortcut for "perlman FOO", so never went any further than
>that.
hmm .. I was certainly someone who didn't go very far with it .. but the
reason had nothing to do with my filesystem
I read the README that was in the tarball (perlman-alpha0.tar.gz) .. it
was talking about a /bin subdirectory - which didn't exist .. nor did
the tarball contain any .pl files - so I guessed that it was an
intermediate release that required other files to already have been
installed
spurred on by your comments above I've successfully tried running the
lib/pod/Tools/perlman.pm file through Perl .. just working on getting
everything working nicely on Win32
>The tarball is where it always was.
could you repost the URL ? .. for my benefit (who has lost the original
posting you made) and for the benefit of others generally
--
jason -- elephant@squirrelgroup.com --
------------------------------
Date: 30 Oct 2000 21:30:22 -0700
From: tchrist@perl.com (Tom Christiansen)
Subject: Re: Tom's perlman utility ?
Message-Id: <39fe4ade@cs.colorado.edu>
In article <MPG.1468f1a1bcfdf7a1989870@localhost>,
jason <elephant@squirrelgroup.com> wrote:
>I read the README that was in the tarball (perlman-alpha0.tar.gz) .. it
>was talking about a /bin subdirectory - which didn't exist ..
No, it didn't. It said:
To run these, do this:
You must setenv PERL5LIB to `pwd`/lib
You must setenv PATH to include `pwd`/bin
Are you not understanding the notation `pwd`/bin?
Moreover, the tarball certainly contains a bin subdirectory.
It's *full* of stuff:
% ls -F bin
catpod@ perldelta@ perlfunc@ perlopentut@ perltrap@
docpath@ perldiag@ perlguts@ perlos2@ perlunicode@
mandirs@ perldoc.new@ perlhack@ perlos390@ perlvar@
olpod@ perldos@ perlhelp@ perlpod@ perlvms@
perl5004delta@ perldsc@ perlhist@ perlport@ perlwin32@
perl5005delta@ perlembed@ perlhpux@ perlre@ perlxs@
perlamiga@ perlfaq1@ perlintern@ perlref@ perlxstut@
perlapi@ perlfaq2@ perlipc@ perlreftut@ pmanpath@
perlapio@ perlfaq3@ perllexwarn@ perlrun@ pmpath@
perlbook@ perlfaq4@ perllocale@ perlsec@ pmpodpath@
perlboot@ perlfaq5@ perllol@ perlstyle@ pod2manpath@
perlbot@ perlfaq6@ perlmachten@ perlsub@ podgrep@
perlcall@ perlfaq7@ perlman@ perlsyn@ podlibdir@
perlcompile@ perlfaq8@ perlmod@ perlthrtut@ podpath@
perlcygwin@ perlfaq9@ perlmodinstall@ perltie@ progpodpath@
perldata@ perlfaq@ perlmodlib@ perltoc@ stdpodpath@
perldbmfilter@ perlfilter@ perlnumber@ perltodo@ tcgrep@
perldebguts@ perlfork@ perlobj@ perltoot@
perldebug@ perlform@ perlop@ perltootc@
Ah, right. You must be on a primitive file system! Of course
the programs are all symlinks to their own modules and manpages.
% ls -l bin
total 0
lrwxr-xr-x 1 tchrist wheel 26 Sep 6 16:00 catpod -> ../lib/Pod/Tools/catpod.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 docpath -> podpath
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 mandirs -> podpath
lrwxr-xr-x 1 tchrist wheel 25 Sep 6 16:00 olpod -> ../lib/Pod/Tools/olpod.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perl5004delta -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perl5005delta -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlamiga -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlapi -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlapio -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlbook -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlboot -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlbot -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlcall -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlcompile -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlcygwin -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldata -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldbmfilter -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldebguts -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldebug -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldelta -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldiag -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:09 perldoc.new -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldos -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perldsc -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlembed -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq1 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq2 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq3 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq4 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq5 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq6 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq7 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq8 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfaq9 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfilter -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfork -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlform -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlfunc -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlguts -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlhack -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlhelp -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlhist -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlhpux -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlintern -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlipc -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perllexwarn -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perllocale -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perllol -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlmachten -> perlman
lrwxr-xr-x 1 tchrist wheel 27 Sep 7 21:05 perlman -> ../lib/Pod/Tools/perlman.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlmod -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlmodinstall -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlmodlib -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlnumber -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlobj -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlop -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlopentut -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlos2 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlos390 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlpod -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlport -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlre -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlref -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlreftut -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlrun -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlsec -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlstyle -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlsub -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlsyn -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlthrtut -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltie -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltoc -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltodo -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltoot -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltootc -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perltrap -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlunicode -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlvar -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlvms -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlwin32 -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlxs -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 6 16:05 perlxstut -> perlman
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 pmanpath -> podpath
lrwxr-xr-x 1 tchrist wheel 25 Sep 6 16:02 pmpath -> ../lib/PM/Tools/pmpath.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 pmpodpath -> podpath
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 pod2manpath -> podpath
lrwxr-xr-x 1 tchrist wheel 27 Sep 6 16:01 podgrep -> ../lib/Pod/Tools/podgrep.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 podlibdir -> podpath
lrwxr-xr-x 1 tchrist wheel 27 Sep 6 16:01 podpath -> ../lib/Pod/Tools/podpath.pm
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 progpodpath -> podpath
lrwxr-xr-x 1 tchrist wheel 7 Sep 4 19:53 stdpodpath -> podpath
lrwxr-xr-x 1 tchrist wheel 20 Sep 6 16:01 tcgrep -> ../lib/PPT/tcgrep.pm
>nor did
>the tarball contain any .pl files -
Now why the devil would I go writing perl libraries in this
day and age? There are .pm files, of course, for the modules.
>so I guessed that it was an
>intermediate release that required other files to already have been
>installed
>spurred on by your comments above I've successfully tried running the
>lib/pod/Tools/perlman.pm file through Perl .. just working on getting
>everything working nicely on Win32
I'm not sure all those words belong together. :-)
>
>>The tarball is where it always was.
>
>could you repost the URL ? .. for my benefit (who has lost the original
>posting you made) and for the benefit of others generally
http://doriath.perl.com/misc/perlman-alpha0.tar.gz
--tom
------------------------------
Date: 31 Oct 2000 02:08:56 GMT
From: cjw44@flatline.org.uk (Colin Watson)
Subject: Re: Unterminated <> operator? what the heck?
Message-Id: <8tl9jo$k7e$1@riva.ucam.org>
oarend@my-deja.com wrote:
>Or can you find the mistake in
>
>if (($obj{'frei'} == 1) and ($obj{'zm'} == $param{'zm'}) and ($obj
>{'gr'} > $mingr[$param{'gr'}]) and ($obj{'gr'} <= $maxgr[$param{'gr'}])
>and ($obj{'pr'} > $minpr[$param{'pr'}]) and ($obj{'pr'} <= $maxpr[$param
>{'pr'}]) and (($obj{'ort'} eq $param{'ort1'}) or ($obj{'ort'} eq $param
>{'ort2'}) or ($obj{'ort'} eq $param{'ort3'}) or ($obj{'ort'} eq $param
>{'ort4'}) or ($obj{'ort'} eq $param{'ort5'})) and (($obj{'jahr'} <
>$param{'jahr'}) or (($obj{'jahr'} < $param{'jahr'}) and ($obj{'monat'}
><= $param{'monat'})))
The quotes and parentheses are confusing, not to mention the lack of
formatting structure, the 1, 2, 3, 4, 5 lookups, and the logical
tautology at the end. Assuming you make $param{ort} into a reference to
an array containing what you previously called $param{ort1},
$param{ort2}, etc., and correcting the likely mistake at the end (since
(A || (A && B)) == A), try something like:
if ($obj{frei} == 1 && $obj{zm} == $param{zm}
&& $obj{gr} > $mingr[$param{gr}] && $obj{gr} <= $maxgr[$param{gr}]
&& $obj{pr} > $minpr[$param{pr}] && $obj{pr} <= $maxpr[$param{pr}]
&& (grep { $obj{ort} eq $_ } @{$param{ort}})
&& ($obj{jahr} < $param{jahr}
|| ($obj{jahr} == $param{jahr} && $obj{monat} <= $param{monat})))
It's obviously not perfect - I'd try to avoid that chain of comparisons
in the first place - but it's a lot easier to spot mistakes in this than
in the original.
In some languages, the simplest way to act on a lot of variables tends
to be cut-and-paste. Thankfully, Perl isn't one of them.
--
Colin Watson [cjw44@flatline.org.uk]
"Ammo is cheap, remember?" - The Internet Oracle
------------------------------
Date: Tue, 31 Oct 2000 03:12:07 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Using 'format' and 'write' multiple times?
Message-Id: <slrn8vse45.p9p.tjla@thislove.dyndns.org>
I was shocked! How could R.Joseph <streaking_pyro@my-deja.com>
say such a terrible thing:
>
>The really odd thing is that I get the output from the while loop -
>that works just fine, but all I get from the format above it is a
>single carriage return! Please help, I can't figure this out! Thanks!
Stupid question: does $data have anything in it? You don't ever seem to
write to it (or $from_file for that matter). It might be a good idea to
post the real code.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
36. Companies must ask themselves where their corporate cultures
end.
From "The Cluetrain Manifesto" http://www.cluetrain.org
------------------------------
Date: Mon, 30 Oct 2000 18:44:57 -0800
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: What about CGI.pm?
Message-Id: <39FE3229.D065B5F7@vpservices.com>
fallenang3l@my-deja.com wrote:
>
> Thank you for your CONSTRUCTIVE criticism... NOT!!!
Sorry if my tone bothered you. I did give you about 5 different reasons
to stop using your script and start using CGI.pm. I think that is
constructive (i.e. helpful).
I also pointed you toward a glaring security hole in your script:
> > > read STDIN, $buffer, $ENV{'CONTENT_LENGTH'}
That opens you up to a buffer overlflow, a security hazard that is
documented in basically every web/cgi security faq ever written (see,
for example the mother of security faqs, not coincidently written by the
author of CGI.pm: http://www.w3.org/Security/Faq/wwwsf4.html). I was
*not* being glib when I said that if you don't realize the danger in
that, then you really need to use CGI.pm because if you do not recognize
one of the most common and elementary security holes, there are many
others that are waiting to bite you and using CGI.pm will protect you
against them.
--
Jeff
------------------------------
Date: Tue, 31 Oct 2000 02:24:42 GMT
From: Mark <mtaylorlrim@my-deja.com>
Subject: Re: What should I do?
Message-Id: <8tlah4$n80$1@nnrp1.deja.com>
In article <1ypL5.575$6b7.10942@vixen.cso.uiuc.edu>,
"Ben Ben" <idleisidle@usa.net> wrote:
> I installed perl5 and Apache web server on Unix.
> And I create a test.pl like this,
>
> #!/usr/local/bin/perl -w
> print "Content-type:text/html\n\n";
> print "<html>\n";
> print "<head><title></title></head>\n";
> print "<body>\n";
> print "0123456789<br>";
> print "</body></html>";
>
> The result of "perl test.pl" on the command line of Unix seems OK, and
> in my internet browser I also can see a .html file on the Apache
server.
> Somehow, I can't get the right result about the test.pl in my internet
> browser. I mean it isn't executed.
>
> What should I do? Thanks in advance.
>
>
First thing probably is type 'which perl' on the command line and be
sure the path to perl on the top line of the script matches the result.
Then simply try to execute the script with ./test.pl
Mark
--
Please reply to this newsgroup as my Deja mail
is used as a spam catcher only!
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 30 Oct 2000 21:36:04 -0500
From: "Ryan & Treena Carrier" <ryanc@nci1.net>
Subject: Re: What should I do?
Message-Id: <39fe2f85_1@news.cybertours.com>
Apache must be configured to recognize the fact that when a perl script with
the .pl extension is requested from a client, it must run the perl shell and
output to the browser. Refer to Apache docs. If you still need help, e-mail
me at ryanc@nci1.net . I can't promise I can help, since I set mine up on a
Windows machine.
"Ben Ben" <idleisidle@usa.net> wrote in message
news:1ypL5.575$6b7.10942@vixen.cso.uiuc.edu...
> I installed perl5 and Apache web server on Unix.
> And I create a test.pl like this,
>
> #!/usr/local/bin/perl -w
> print "Content-type:text/html\n\n";
> print "<html>\n";
> print "<head><title></title></head>\n";
> print "<body>\n";
> print "0123456789<br>";
> print "</body></html>";
>
> The result of "perl test.pl" on the command line of Unix seems OK, and
> in my internet browser I also can see a .html file on the Apache server.
> Somehow, I can't get the right result about the test.pl in my internet
> browser. I mean it isn't executed.
>
> What should I do? Thanks in advance.
>
>
>
------------------------------
Date: 30 Oct 2000 21:05:47 -0500
From: Joe Schaefer <joe+usenet@sunstarsys.com>
Subject: Re: Which is the best PERL learning book?
Message-Id: <m3aebl7ojo.fsf@mumonkan.sunstarsys.com>
Larry Rosler <lr@hpl.hp.com> writes:
> I can't judge its worthiness on the basis of the handful of reviews at
> Amazon from people I don't know. It isn't mentioned on Uri Guttman's
> website.
>
> Beginning Perl
> by Simon Cozens, Peter Wainwright
> List Price: $39.99
>
The source code is available online:
http://www.wrox.com/Consumer/Store/Details.asp?ISBN=1861003145
it might give a clue as to the quality of the book.
--
Joe Schaefer
------------------------------
Date: Tue, 31 Oct 2000 03:28:00 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Which is the best PERL learning book?
Message-Id: <x7k8apita8.fsf@home.sysarch.com>
>>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
LR> I can't judge its worthiness on the basis of the handful of
LR> reviews at Amazon from people I don't know. It isn't mentioned on
LR> Uri Guttman's website.
i haven't put much effort into that in a while. :(
LR> Beginning Perl
LR> by Simon Cozens, Peter Wainwright
LR> List Price: $39.99
LR> The blurb says it uses Perl 5.6 throughout, which is a Good Thing.
LR> "Learning Perl" is certainly getting 'long in the tooth'. Other than
LR> that, who knows whether to recommend it?
simon is a known perl hacker and is active in p5p and perl6 and
#perl. the book is considered decent and worth recommending it. i have
browsed it and not fully read it. on the other hand, wrox is a crapola
publisher that just recently (a couple of days ago) spammed many perl
people (it has been conjectured that they culled their names from
perl.com) with a stupid request to write chapters for a book in 2 weeks.
see this
http://www.advogato.org/person/Skud/
for one person's view of that story.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Mon, 30 Oct 2000 21:36:18 -0500
From: H C <carvdawg@patriot.net>
Subject: Re: Win32::IpHelp
Message-Id: <39FE3022.B1AC517B@patriot.net>
http://www.generation.net/~aminer/Perl/
It's there, I just checked...
rereidy@my-deja.com wrote:
> Hi everyone,
>
> I am looking for this module (referenced in 'Perl for System
> Administrators), but I cannot find it on
> http://www.generation.net/~aminer/Perl. I also cannot find it on CPAN
> or ActiveState.
>
> Does anyone have any idea where I can find this module?
>
> Thanks for your time.
>
> Ron Reidy
> Oracle DBA
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
--
Q: Why is Batman better than Bill Gates?
A: Batman was able to beat the Penguin.
------------------------------
Date: Tue, 31 Oct 2000 04:55:59 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: Working with time
Message-Id: <zhsL5.35$Bf7.170933248@news.frii.net>
In article <39FD065B.D23ED863@xenoscience.com>,
Steve Flitman <sflitman@xenoscience.com> wrote:
>Ack! Use Date::Calc, don't reinvent the wheel.
>It has very nice delta functions.
>
>Steve
>
This leads me to ask. Has anyone wrapped Date::Calc with something
that objectifys the interface? I find it cumbersome to track all
the component parameters that go into and out of those functions.
Great funcionality in the module! It's just a little hard to use
to my (perhaps un-refined) way of thinking.
I'll also add that if there is any interest and there is no one
working on this I might make a stab at it.
thanks
chris
--
This space intentionally left blank
------------------------------
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 4770
**************************************
