[9599] in Perl-Users-Digest
Perl-Users Digest, Issue: 3193 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jul 18 10:27:26 1998
Date: Sat, 18 Jul 98 07:00:41 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 18 Jul 1998 Volume: 8 Number: 3193
Today's topics:
($| = 1 || $| = 0) <joreb@algonet.se>
Re: /^[a-z0-9]/ <joreb@algonet.se>
Re: Annoying warning : Variable %s will not stay shared (Tye McQueen)
Re: Can a Crontab run perl script (-)
Can be hashes tied to .dbm a.s.o be arbitrarily complex (Franz Kaufmann)
Re: clp.moderated birgitt@my-dejanews.com
Re: clp.moderated <merlyn@stonehenge.com>
Re: Editing files <tchrist@mox.perl.com>
Re: How do I clear an array? (-)
How to keep the handles and the processes alive with IP (Franz Kaufmann)
NEED HELP: copydir function for Win95/WinNT <dbm@cadence.com>
Re: OFFTOPIC: Re: HELP: Internet Database Design questi (C. Abney)
Re: Oh man, DO I love Perl ! (References to things that <davidc@selectst.com>
Re: On mixing (seek/tell) and (sysopen/syswrite) <jhi@alpha.hut.fi>
Re: Reading in an email message into a Perl program (-)
Re: Restricting refering domains access to script? <tchrist@mox.perl.com>
Re: Reverse an associative array <davidh+perl.misc@psiphi.org>
Re: Sendmail ? <zenin@bawdycaste.org>
string manipulation, newbie question (Rick Harrison)
Re: upload in CGI perl <REPLY_TO_damonbrent@earthlink.net>
Win32 install prob--another idiot <sponge@iav.com>
Re: Win32 install prob--another idiot <*clinton@consol.co.uk>
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 18 Jul 1998 13:54:28 GMT
From: "Ekenberg" <joreb@algonet.se>
Subject: ($| = 1 || $| = 0)
Message-Id: <01bdb253$94b8a340$929964c3@w95>
I have a very basic question to ask:
How does the autoflush variable ($|) affect scripts? I've read about it in
the Camelbook and other places, but I don't seem to be able to make it work
like it's described.
I tried with this little code snippet:
-------------------------------
#!/usr/bin/perl -w
$| = 1; # tried both true and false here
print "Content-type: text/html\n\n";
print "one\n";
sleep 5;
print "two\n";
---------------------------------
When calling this like a cgi, it sleeps first and writes everything second,
no matter if I set $| to true or false. When executed at commandline, it
writes, sleeps, and writes again, again no matter how I set $|.
I wanted it to write, sleep, and write again when called as cgi, but no.
Thats also how I understood from explanations in books and script-comments
that it would do. Why else is it include in so many scripts?
Please enlighten me!
Thanks in advance, Johan Ekenberg, Sweden
------------------------------
Date: 18 Jul 1998 09:22:45 GMT
From: "Ekenberg" <joreb@algonet.se>
Subject: Re: /^[a-z0-9]/
Message-Id: <01bdb22d$9e553a60$069264c3@w95>
If you move the caret inside the brackets: /[^a-z0-9]/, You'll be just fine
:)
BTW, it's right there in the Camel book, page 64.
Good luck!
/Johan E
>
> /^[a-z0-9]/
>
> In unix shell, that's suppose to check if there are non-alphanumeric
> characters in the input. I already searched through 2 different
> perl books (the camel book + using perl 5) and I still don't know how
> to tell perl to check for all characters NOT included inside the
brackets.
>
------------------------------
Date: 18 Jul 1998 01:36:01 -0500
From: tye@fohnix.metronet.com (Tye McQueen)
Subject: Re: Annoying warning : Variable %s will not stay shared ...
Message-Id: <6opfoh$r6o@fohnix.metronet.com>
Chris Wareham <chris.wareham@blackwell.co.uk> writes:
)
) Variable "$user" will not stay shared at lib/createManifest.pm line 118.
) Variable "$passwd" will not stay shared at lib/createManifest.pm line 118.
[...]
) sub checkUrl {
) my ($url, $user, $passwd) = @_;
[...]
) sub get_basic_credentials {
) return($user, $passwd); # line 118
) }
I _think_ the warning is telling you that $user/$passwd
can't stay shared after checkUrl() returns as those
variables will disappear at that point. You could try
{ my( $user, $passwd );
sub checkUrl {
my $url;
($url, $user, $passwd) = @_;
sub get_basic_credentials {
return($user, $passwd); # line 118
}
}
}
Of course, this may not matter as get_basic_credentials()
might never get called after checkUrl() returns.
But then again I'm probably completely wrong.
Good luck,
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: Sat, 18 Jul 1998 13:31:18 GMT
From: root.noharvest.\@not_even\here.com (-)
Subject: Re: Can a Crontab run perl script
Message-Id: <35b0a302.365763991@news2.cais.com>
Wali Haidri <whaidri@ford.com> Said this:
>I wrote a perl (actually an oraperl) program. It runs as expected when
>submitted from the command line. But when I run it from a crontab, it
>does not work.
>
>Thanks.
Anywhere in the script where you use "relative" paths, you will need
to make them full paths.....
open (IN, "somefile.pl");
needs to be changed to
open (IN, "/full/dir/to/somefile.pl");
and so forth. When you run it, your current directory is your
"working directory" but when crontab runs it, he's not smart enough to
know what you want the "working directory" to be, so he uses his
current directory, which is off somewhere in /usr/sbin land or
something.
------------------------------
Date: Sat, 18 Jul 98 11:12:59 gmt
From: ws97-868@wsrz1.wiso.uni-erlangen.de (Franz Kaufmann)
Subject: Can be hashes tied to .dbm a.s.o be arbitrarily complex?
Message-Id: <6opour$r1d$1@rznews.rrze.uni-erlangen.de>
Hello,
I recently wondered whethe ,when I tie a hash to a dbm or other database
file,whether this hash needs to be straight KEY=>SCALAR or if it can
contain KEY<->VALUE pairs where VALUE can be a arbitrary data type,e.g
another hash or a 2d-array or a glob or a reference or.. you get it.
Does anyone know this?
Thank you in advance.
------------------------------
Date: Sat, 18 Jul 1998 11:10:09 GMT
From: birgitt@my-dejanews.com
Subject: Re: clp.moderated
Message-Id: <6opvqh$7e9$1@nnrp1.dejanews.com>
In article <6oo0d9$5hl$1@client3.news.psi.net>,
abigail@fnx.com wrote:
> Russ Allbery (rra@stanford.edu) wrote on MDCCLXXXI September MCMXCIII in
> <URL: news:m3zpe9ndg6.fsf@windlord.Stanford.EDU>:
> ++ Abigail <abigail@fnx.com> writes:
> ++
> ++ > He doesn't respond [1]. Now what do I do?
> ++
> ++ > [1] PSInet. Worthless provider. Given the number of new groups that
> ++ > appeared on their servers the last year, I never had any hopes
> ++ > comp.lang.perl.moderated will be a group I can read.
> ++
> ++ Find a different provider? Newsguy is extremely inexpensive for a fairly
> ++ solid newsfeed.
>
> I don't think management will go for that..... PSI salestalks make PHB's
drool.
>
dejanews.com had clp.moderated as soon as it became available.
Birgitt Funk
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 18 Jul 1998 12:19:36 GMT
From: Randal Schwartz <merlyn@stonehenge.com>
Subject: Re: clp.moderated
Message-Id: <8czpe7xsfj.fsf@gadget.cscaper.com>
>>>>> "birgitt" == birgitt <birgitt@my-dejanews.com> writes:
birgitt> dejanews.com had clp.moderated as soon as it became available.
That's really odd. They *still* don't have comp.lang.perl.announce
after *three* years.
print "Just another Perl newsgroup moderator,"
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: 18 Jul 1998 11:54:37 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Editing files
Message-Id: <6oq2dt$cqc$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
tim221175@my-dejanews.com writes:
: Is there an easy way of editing a file. I want to append a line of text in
:the middle of a text file. Will I have to cut the file in two halves and then
:concatenate them with new line in the middle or is there an easy way to do
:this in perl?
You mean other than the way covered in the second section of perlfaq5,
shipped as part of the standard set of manpages with every installation
of Perl and fully greppable on your own system?
--tom
--
"I sincerely hope that the future does not mean we must continually restrict
ourselves to the tools that were available 10 years ago."
Mark Bush in comp.unix.wizards <4235@inca.comlab.ox.ac.uk>
------------------------------
Date: Sat, 18 Jul 1998 13:40:19 GMT
From: root.noharvest.\@not_even\here.com (-)
Subject: Re: How do I clear an array?
Message-Id: <35b0a4b0.366193732@news2.cais.com>
kortbein@iastate.edu (Josh Kortbein) Said this:
>Robert Eric Pearse (pearse@mail.shebang.net) wrote:
>: But, ' @array = ""; ' inserts a null value into the array. And when it
>
>@array = ();
>
How about undef(@array);
?????
sure it takes more keystrokes, but when you return to this script a
few months from now, it's a little clearer as to why you did it.
@array = (); may, on an off day with poor lighting and a hangover
cause you to wonder if you meant to undefine the array or accidentally
deleted or forgot to add the list information. Well, it could happen.
;)
------------------------------
Date: Sat, 18 Jul 98 11:18:18 gmt
From: ws97-868@wsrz1.wiso.uni-erlangen.de (Franz Kaufmann)
Subject: How to keep the handles and the processes alive with IPC::Open2?
Message-Id: <6opp9o$r1d$2@rznews.rrze.uni-erlangen.de>
Hello,
I recently discovered that IPC::Open2 & IPC::Open3 were usable for
calling a subprocess,giving him arguments and reading its STDOUT &
STDERR.
Yet,if the commands return they have killed off the processes and the
handles on the used pipes.
Is there a way that if you use these commands on programmes who have
their own console ,like sh or bc or pari a.s.o,so that the process is
kept alive,so one could send the same process more than one command?
Thank you in advance.
------------------------------
Date: Fri, 17 Jul 1998 22:25:33 -0700
From: David Morris <dbm@cadence.com>
To: dbm@cadence.com
Subject: NEED HELP: copydir function for Win95/WinNT
Message-Id: <35B031CD.574BCA4@cadence.com>
Hi everyone:
I have a project requiring the copy of a directory tree of data (complete
with subfolders and files) from 1 location to another on Win95/WinNT.
According to the perl manpages and various perl documents I've read, the
package "file::copy" should contain both a copy and copydir function.
Unfortunately in my case, I only have the copy function in my edition of
copy.pm (from 5.00471 ActivePerl installation). I could use some help since
this is a stumbling block for me now. I could use either someone sending me a
copy.pm that contains the copydir function, *or*, some help with a crafted
piece of code.
Thanks folks,
--
-----------------------------------------------------------
David Morris Cadence Design Systems, Architect: Eng. PT&D
e-mail:dbm@cadence.com Tel:408.895.2136 Fax:408.894.3487
555 River Oaks Pkwy SJ4 MS-4B1 San Jose, CA 95134
------------------------------
Date: 18 Jul 1998 03:31:41 GMT
From: cabney@rodentia.cyberpass.net (C. Abney)
Subject: Re: OFFTOPIC: Re: HELP: Internet Database Design questions...
Message-Id: <6op4ut$t2p$1@news.infonex.net>
In article <900580718.1086.0.nnrp-08.c3ad2585@news.demon.co.uk>,
"Jamie Cruise" <jamiec@hampton.co.uk> writes:
> Hi C,
> The bug that you outline is indeed quite serious, though also quite
> easily resolved. To dismiss a platform because of such a bug is still
> however somewhat naive. For example I cannot see how this is in any way as
> serious as some previous unix security holes (e.g. sendmail) I mean,
> viewing the contents of a script instead of executing is indeed a big issue,
> but not quite as big as allowing remote users to su root and rm -rf /.
> However those issues are pretty much resolved and the world has moved
> on...Like you should.
Yup, I shouldn't have made that post, it's off topic in this forum and
I'm a newbie here. If you think it's namve though, then I have to say
you're a maroon. That 'bug' is trivial compared to the sendmail bug.
Any two-bit script kiddy could do that one. NT is a rehash of old,
resolved bugs. As for fixed, I could name any number of local sites
that ignore the warnings (yeah, just like the sendmail bug, but that
was a compile time option, a mis-used 'feature.')
I should'na done it, I won't do it again. Whoa, look where I'm posting!
Follow-ups redirected to comp.os.perl.misc
-C
--
All your qualifications for kookiness seem to be aimed at eliminating
yourself simply because you advocate a mainstream product. That is sort
of just being a kook who is a conformist. A bit of a contradiction in
terms, but a valid description. -Bob O C. Abney
------------------------------
Date: Sat, 18 Jul 1998 23:19:39 +1000
From: David Coldrick <davidc@selectst.com>
Subject: Re: Oh man, DO I love Perl ! (References to things that go out of scope)
Message-Id: <35B0A0EA.4137F83D@selectst.com>
John Chambers wrote:
<snip>
I have written several 1000+ perl programs, and I've
> OOified some parts of some of them. But in looking back, I can't
> really say that it has ever been a big win. The code is much more
> opaque than before, and I'm the only one that understands why I
> wasted all that time just making the code harder to read. And in
> most cases, the resulting code has run slower, for reasons that I
> don't quite fathom.
>
> Also, OO is much more difficult to learn and debug. The perl debugger
> seems to have problems with it: "my" variables always come up null,
> references display as hex values, and so on. You are pretty much reduced
> to the old "add another print" to find out what's gone wrong. So it's
> easy to write something first in a non-OO fashion, so you can use the
> debugger. And then, once you've got it running, you think that you
> should redo it in OO style, but you have other tasks that are higher
> priority, so it gets put aside for now ...
<snip>
Nigel Chapman's book has an excellent section on OO in Perl, the example
in which really nicely demonstrates the value of the approach. He also
discusses his earlier similar apprehension about the value of OO, and
how well it works out in so many situations. Worth a read!
Regards,
David
------------------------------
Date: 18 Jul 1998 11:53:18 +0300
From: Jarkko Hietaniemi <jhi@alpha.hut.fi>
Subject: Re: On mixing (seek/tell) and (sysopen/syswrite)
Message-Id: <oeezpe7o801.fsf@alpha.hut.fi>
k y n n <NOSPAMkEynOn@panix.comNOSPAM> writes:
> posted a script illustrating this recently). From what I understand,
> sysopen, syswrite, sysread, etc. use a different "interface" from that
> used by open, print, and tell (and seek?), which means that mixing
Yes, don't do that. open, print, seek, and tell use their own
buffered IO, whereas sysopen, syswrite, sysread, and - ta-dah -
sysseek use direct native IO.
> Alternatively, how can I use open() and print() to write at a given
You don't.
> offset from the beginning of a file without erasing it (as would
--
$jhi++; # http://www.iki.fi/~jhi/
# There is this special biologist word we use for 'stable'.
# It is 'dead'. -- Jack Cohen
------------------------------
Date: Sat, 18 Jul 1998 13:24:45 GMT
From: root.noharvest.\@not_even\here.com (-)
Subject: Re: Reading in an email message into a Perl program
Message-Id: <35b0a027.365057467@news2.cais.com>
"George H" <george@tapestry.net> Said this:
>I am trying to write a program to parse email messages as they arrive and
>extract certain headers. Right now, I am trying to write the simplest of
>programs to just test that I can even do anything with an e-mail message.
>
>I am running Perl 5.004, Linux release 1.3, Sendmail 8.8.5.
>
>Here is what I have done.
>
>I set up an alias in my /etc/aliases file that looks like ...
>
>testing: "|/home/george/emailparse.pl"
>
First of all, my opinion (strictly opinion) is to actually set up a
user account rather than just an alias. This way, you always have the
option of "removing" the perl filtering if there is some reason later
on. You can use the .forward file in the user home directory almost
exactly like you are using the alias definition:
"|~/emailparse.pl"
now... the enlightening portion of this message! :)
The below code will do everything you need:
#!/usr/bin/perl
$header = '';
$body = '';
while (<>) # Get headers
{
last if /^$/;
($field, $value) = /^(\S*)\s*(.*)/;
if (length($field) > 1) { $fields{$field} = $value; }
else { $fields{$field} .= " $value"; }
}
while (<>) # Get body
{
$body .= $_;
}
>From here, you're all set. All message headers are callable from the
associative array (hash) %fields.
For example:
$from = $fields{"From:"};
$to = $fields{"To:"};
$subject = $fields{"Subject:"};
$reply_to = $fields{"Reply-to:"};
etc etc.
And the message itself is in $body.
------------------------------
Date: 18 Jul 1998 13:53:04 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Restricting refering domains access to script?
Message-Id: <6oq9c0$o3t$1@csnews.cs.colorado.edu>
Alas, there is no such thing as a `refering [sic] domain'! The word is
`referring'. The writers of the HTTP docs don't seem to have been able
to spell, or to spell-check.
--tom
averring conferring deferring deterring disinterring erring herring
inerring inferring interring preferring referring transferring
underring undeterring unerring
--
Chip Salzenberg sent me a complete patch to add System V IPC (msg, sem and
shm calls), so I added them. If that bothers you, you can always undefine
them in config.sh. :-) --Larry Wall in <9384@jpl-devvax.JPL.NASA.GOV>
------------------------------
Date: 17 Jul 1998 16:52:54 GMT
From: David Henderson <davidh+perl.misc@psiphi.org>
Subject: Re: Reverse an associative array
Message-Id: <message000135@psiphi.org>
Clas <qmwclka@emw.ericsson.se> wrote:
>%ages = ("Angie ", 39,
> "Dirty ", 34,
> "Michael ", 27,
> "Willy ", 21 );
>How should I do to reverse this?
>So Willy will be the first name in the associative array.
Associative arrays aren't stored in the order you list them as. (Well,
they might by accident, but not intentionally.) If you want to get a
list of the keys in a certain order (alphabetical, reverse alphabetical,
numerical, or otherwise), you can use:
@age_keys = sort {$a cmp $b} keys %ages;
to get @age_keys == ("Angie ", "Dirty ", "Michael ", "Willy "), or
@age_keys = sort {$b cmp $a} keys %ages;
to get @age_keys == ("Willy ", "Michael ", "Dirty ", "Angie "). Then do
your processing with @age_keys.
David Henderson
--
Star Trek? Psi Phi! Visit http://www.psiphi.org/ for the latest news
and rumors about "Star Trek: Deep Space Nine" and "Star Trek: Voyager"
----------------------------------------------------------------------
<*> Bermuda Trekangle Member, http://hci.ise.vt.edu/~jreiss/trekangle/
------------------------------
Date: 18 Jul 1998 05:01:40 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Sendmail ?
Message-Id: <900738680.738259@thrush.omix.com>
Eli the Bearded <*@qz.to> wrote:
: vim has been ported to most everything on earth.
Yes, but this argument can be made for pretty much every editor
in the running for an "editor war".
Ported to does not mean installed on, which is where my comments
about sysadmins and similar being the only people that should
really be using stock vi comes in.
I personally can't stand vi, but I thank god every time I'm on a
different Unix box that it's there and that the Unix world has
it so good. Jumping around misc NT boxes with NotePad/WordPad
being the only stock "editor" reliably installed is a major
pain no one should have to live through...
--
-Zenin (zenin@archive.rhps.org) From The Blue Camel we learn:
BSD: A psychoactive drug, popular in the 80s, probably developed at UC
Berkeley or thereabouts. Similar in many ways to the prescription-only
medication called "System V", but infinitely more useful. (Or, at least,
more fun.) The full chemical name is "Berkeley Standard Distribution".
------------------------------
Date: Sat, 18 Jul 1998 03:40:26 -0400
From: rick@harrison.net (Rick Harrison)
Subject: string manipulation, newbie question
Message-Id: <rick-ya02408000R1807980340260001@news.newsguy.com>
I have a bilingual dictionary file that is formatted like this...
vial : hettuglas
vibration : titringur
victim : tjónþoli
What's the most efficient way to get a string from any line of this
file that consists only of the part before the colon? In QuickBasic
I would have done something like this:
w = LEN(line$) - INSTR(line$, ":") - 1
IF w > 1 THEN desired$ = LEFT$(line$, w) ELSE desired$=""
but suddenly I need to do it in Perl, which I am just learning.
Also, is it better (with regard to conservation of web server resources)
to suck the whole file into an array before combing through it to
find pattern matches, or better to pull one line at a time from the
disk file?
------------------------------
Date: Sat, 18 Jul 1998 05:51:56 -0400
From: "Brent Verner" <REPLY_TO_damonbrent@earthlink.net>
Subject: Re: upload in CGI perl
Message-Id: <6opr78$q62$1@birch.prod.itd.earthlink.net>
the official format of the http file upload is described fully in RFC 1867
linked below:
http://sunsite.rediris.es/ftp/docs/network/rfc/18xx/1867 (good stuff
here!!!)
you can see the format of the STDIN by running the following script on your
server.
#!/usr/bin/perl
print "Content-Type: text/html\n\n";
read STDIN, $print_this, $ENV{'CONTENT_LENGTH'};
print qq|<HTML><BODY><FORM METHOD=POST ENCTYPE="multipart/form-data"
ACTION="$script_url">
<input type=hidden name="some_hidden_variable_name"
value="some_hidden_variable_value">
enter some text here <input type="text" name="input_text" size=35><BR>
File to upload: <input type="file" name="upload-1.hmm" size=40><br>
hint: <B>pick a small file</B> <BR>
<input type=submit value="Submit Multi-Part form data">
</form><BR><HR>|;
print "below is content of STDIN (view source of HTML to see actual format
of STDIN data)
-- <BR> <BR>\n\n\n\$ENV{'CONTENT_TYPE'} is
|$ENV{'CONTENT_TYPE'}|<BR>
\n\n\n|$print_this|<BR>\n\n\n\n\n</BODY></HTML>";
1;
hope this helps you as much as it did me.
study the RFC and the contents of the STDIN, you'll get it...handling large
file uploads requires a bit of read buffering trickery however.
brent
>I am just wondering if somebody can give me a small example about
>uploading files in CGI perl.. I keep getting stuck in this problem..
>Thanks a bunch..
>
>Indra
>
------------------------------
Date: 18 Jul 1998 05:33:44 GMT
From: "Neal Miyake" <sponge@iav.com>
Subject: Win32 install prob--another idiot
Message-Id: <01bdb20c$ed402e80$4e0918cf@default>
Help!
I'm trying to install Perl for Win32 (from Activeware, version 5.003) onto
my NT Server running IIS3. It loads fine, and seems to work. I can do the
"helloworld.pl" from the command line no prob (there is a path set to the
perl.exe file)
However, when I try and run a script through my browser (IE4), I get big
time problems. If I put a perl script in the c:\inetpub\perl\bin directory
and try and run it, I get an 403.2 error (Forbidden read access). If I put
it somewhere under c:\inetpub\wwwroot tree, the script is displayed on the
browser.
I thought, when I installed it, it set any .pl file to run perl.exe. What
gives?
Also, do I have to choose a particular "bin" directory exclusively to put
my scripts in? How do I set up the directory permissions or settings in
NT?
Please help me! I am stressing under an extreme deadline. Please copy to
sponge@iav.com also. Thanks, in advance.
Neal Miyake
------------------------------
Date: Sat, 18 Jul 1998 11:42:19 +0100
From: "Clinton Gormley" <*clinton@consol.co.uk>
Subject: Re: Win32 install prob--another idiot
Message-Id: <6opugt$pvs$1@taliesin.netcom.net.uk>
With IIS 3, you need to edit the registry to make IIS reognise .pl files as
scripts : the instructions can be found on the micrsoft knowledge base at :
http://support.microsoft.com/support/kb/articles/q150/6/29.asp
the key instructions are :
1)Start Regedt32.exe and open
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\
Services\W3SVC\Parameters\ScriptMap
2)Click Add Value from the Edit menu.
3)The Value Name is .pl
4)The Data type is REG_SZ.
5)The String value is <the full path to perl.exe>\perl.exe %s %s
NOTE: The "%s %s" is case sensitive. (e.g. "%S %S" will not work).
6)Restart the WWW service.
It's a good idea to keep all of your scripts in one folder (per web site).
That folder needs to be given 'execute' permission. How you do this in IIS 3
i don't know (presumably straight-forward in the Internet Services
Manager?), but if you upgrade to IIS 4 it allows you to do all of the above
quite easily.
In the meantime, IIS 3 definitely gives execute permission to its scripts
directory, so you could use that as a virutal directory within your web
site.
Clint
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 3193
**************************************
