[13393] in Perl-Users-Digest
Perl-Users Digest, Issue: 801 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Sep 15 12:17:25 1999
Date: Wed, 15 Sep 1999 09:05:34 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 15 Sep 1999 Volume: 9 Number: 801
Today's topics:
Re: And the band played Waltzing Matilda (Excession)
Re: And the band played Waltzing Matilda (Kirrily 'Skud' Robert)
Re: And the band played Waltzing Matilda <lars@rasmussen.org>
Are threads the way to go? Design Advice (Bill Moseley)
Re: Are threads the way to go? Design Advice <dan@tuatha.sidhe.org>
Re: Are threads the way to go? Design Advice <rootbeer@redcat.com>
Re: Array Problems (Bart Lateur)
Re: back for more sorting abuse (Anno Siegel)
Re: back for more sorting abuse (Anno Siegel)
Re: back for more sorting abuse (Kragen Sitaker)
Best way to determine type of reference, regardless of (Sean McAfee)
Re: Best way to determine type of reference, regardless (Kragen Sitaker)
Re: buying perl book (Help me) <tyjang@chico.cstr.ed.ac.uk>
can you reach 'www.perl.com'? <tyjang@chico.cstr.ed.ac.uk>
Re: can you reach 'www.perl.com'? <gellyfish@gellyfish.com>
Re: can you reach 'www.perl.com'? (Kragen Sitaker)
Re: ceiling a decimal number (Anno Siegel)
Re: CGI /PL permissions <whiteg@sympatico.ca>
Re: CGI /PL permissions <rasmusr@online.no>
Re: CGI /PL permissions <dsparling@my-deja.com>
Re: CGI cannot open relative path <jdupayrat@webraska.com>
Re: CGI Hosting? <krajzewicz@inx.de>
Re: CGI in PERL (Zenin)
Re: CGI in PERL <dan@tuatha.sidhe.org>
Re: challenge results (Neko)
Re: Closing a pipeline before the command is done <rootbeer@redcat.com>
Re: Closing a pipeline before the command is done (Larry Martell)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 15 Sep 1999 04:49:42 GMT
From: daccles@ozemail.com.au (Excession)
Subject: Re: And the band played Waltzing Matilda
Message-Id: <37e02411.34716014@news.ozemail.com.au>
skud+usenet@netizen.com.au (Kirrily 'Skud' Robert) wrote:
>In article <37e055b7.39615744@news.ozemail.com.au>, Excession wrote:
>>The same cannot be said for my poor suffering 'run by volunteers' ISP, which
>>has had mondo problems since someone posted an URL relating to moi, into that
>>den of indecent sycophants and wannabe godlets, #perl.
>Why thank you, I'm flattered.
For being an indecent sycophant?
Or a wannabe godlet?
Or perhaps both? (its not unusual, eh!)
Please, Skud, try to be clear with your remarks in future. Remember the meme:
"Imprecise mumbling makes Kirrily a soft target."
If, on the other foot, you're serious about engaging in denial of service
attacks against Australian ISP's, then you're even *more* seriously fucked in
the head than I'd previously imagined.
Have a nice day.
Dac
--
David Andrew Clayton # Please remove NOSPAM when
dac@NOSPAM.pcug.org.au # sending email replies.
I post therefore I am. # ICQ 6862357 : ObWierd 1999 / 3 = 666.33333333333
------------------------------
Date: 15 Sep 1999 05:15:39 GMT
From: skud+usenet@netizen.com.au (Kirrily 'Skud' Robert)
Subject: Re: And the band played Waltzing Matilda
Message-Id: <slrn7tuarr.e44.skud+usenet@hiro.netizen.com.au>
In article <37e02411.34716014@news.ozemail.com.au>, Excession wrote:
>For being an indecent sycophant?
>Or a wannabe godlet?
Yeah, that.
>Have a nice day.
Oh, I am, I am.
K.
--
Kirrily 'Skud' Robert - skud@netizen.com.au - http://netizen.com.au/
Ask the next question. Keep on asking questions and don't stop, and sooner
or later you'll be asking intelligent ones. If you live long enough.
------------------------------
Date: 15 Sep 1999 08:07:31 +0200
From: Lars Balker Rasmussen <lars@rasmussen.org>
Subject: Re: And the band played Waltzing Matilda
Message-Id: <wk7llsoggs.fsf@image.dk>
daccles@ozemail.com.au (Excession) writes:
[something about IRC]
You'd be surprised how little most of us care.
--
Lars Balker Rasmussen "Woo hoo!?"
------------------------------
Date: Wed, 15 Sep 1999 06:53:07 -0700
From: moseley@best.com (Bill Moseley)
Subject: Are threads the way to go? Design Advice
Message-Id: <MPG.12494495c1b42a1d989749@nntp1.ba.best.com>
I've got a list of, say, 5000 unique URLs. I want to do some link
checking, but it seems really slow to just do them one at a time. Seems
like I should be sending off other LWP requests while I'm waiting for a
response from the last one I sent.
Is there another way to do this without threads? (Since I have no
experience in perl threads).
Is there a way to load limit so I don't end up making a denial of
service attack on myself? I mean a way to determine how fast I can send
without clogging up the system?
Thanks,
--
Bill Moseley mailto:moseley@best.com
pls note the one line sig, not counting this one.
------------------------------
Date: Wed, 15 Sep 1999 14:36:19 GMT
From: Dan Sugalski <dan@tuatha.sidhe.org>
Subject: Re: Are threads the way to go? Design Advice
Message-Id: <D9OD3.13641$wW2.13459@news.rdc1.ct.home.com>
Bill Moseley <moseley@best.com> wrote:
> I've got a list of, say, 5000 unique URLs. I want to do some link
> checking, but it seems really slow to just do them one at a time. Seems
> like I should be sending off other LWP requests while I'm waiting for a
> response from the last one I sent.
> Is there another way to do this without threads? (Since I have no
> experience in perl threads).
Fork is probably the better way to do this. ('Specially as LWP may not be
thread-safe, and threads aren't 100% stable yet anyway) Have a master
program that forks off children to check the URLs. It can keep track of
what kids are outstanding and spawn off new ones when old ones finish. (Or
just give each kid a list of x URLs to check and let 'em all run to
completion--whatever's easier)
Dan
------------------------------
Date: Wed, 15 Sep 1999 07:57:58 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Are threads the way to go? Design Advice
Message-Id: <Pine.GSO.4.10.9909150750550.25903-100000@user2.teleport.com>
On Wed, 15 Sep 1999, Bill Moseley wrote:
> I've got a list of, say, 5000 unique URLs. I want to do some link
> checking, but it seems really slow to just do them one at a time. Seems
> like I should be sending off other LWP requests while I'm waiting for a
> response from the last one I sent.
>
> Is there another way to do this without threads? (Since I have no
> experience in perl threads).
I think you could use the methods in Randal's 27th Web Techniques
column, which implements a parallel bad-link tester without threads.
http://www.stonehenge.com/merlyn/WebTechniques/
> Is there a way to load limit so I don't end up making a denial of
> service attack on myself? I mean a way to determine how fast I can send
> without clogging up the system?
See lines 33 and 34 of the script. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 15 Sep 1999 07:33:31 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Array Problems
Message-Id: <37e3476d.2772504@news.skynet.be>
Michael Scheferhoff wrote:
>is it possible to put a value in the middle of an array, so that the
>ones behinds move one place down?
Yes: splice(). It's daunting at irst, but it's powerful.
@ary = ('a' .. 'f');
splice @ary, 3, 0, 'new entry';
print join '; ', @ary;
3 = starting index (number of elements on the left)
0 = number of elements to replace (none)
'new entry' = a list of one item = new items to do the replacement with
--
Bart.
------------------------------
Date: 15 Sep 1999 10:30:19 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: back for more sorting abuse
Message-Id: <7rnsfr$i13$1@lublin.zrz.tu-berlin.de>
Kragen Sitaker <kragen@dnaco.net> wrote in comp.lang.perl.misc:
[sorting paper by Uri and Larry]
>It should be noted that the 'caching the sortkeys' approach -- without
>the ||cache -- only works when the sortkeys are unique.
Huh? Why do jou think so?
Anno
------------------------------
Date: 15 Sep 1999 10:55:06 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: back for more sorting abuse
Message-Id: <7rntua$i3n$1@lublin.zrz.tu-berlin.de>
Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
>START ENT3 T-1
>1H LD4 H,3
> ENT1 INPUT,4
> ST1 5F(0:2)
> ST1 6F(0:2)
[...]
Eeek! Self-modifying code alert! Where is Emulator::MixAl when
we need it?
Btw, the program as reproduced in the first edition of _Sorting and
Searching_ differs in some details. Someone must have really cared.
Anno
------------------------------
Date: Wed, 15 Sep 1999 13:41:34 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: back for more sorting abuse
Message-Id: <imND3.12447$N77.926281@typ11.nn.bcandid.com>
In article <7rnsfr$i13$1@lublin.zrz.tu-berlin.de>,
Anno Siegel <anno4000@lublin.zrz.tu-berlin.de> wrote:
>Kragen Sitaker <kragen@dnaco.net> wrote in comp.lang.perl.misc:
>>It should be noted that the 'caching the sortkeys' approach -- without
>>the ||cache -- only works when the sortkeys are unique.
>
>Huh? Why do jou think so?
I thought so because I was confused. Don't worry. I was wrong.
Kragen
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Tue Sep 14 1999
55 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Wed, 15 Sep 1999 15:16:43 GMT
From: mcafee@waits.facilities.med.umich.edu (Sean McAfee)
Subject: Best way to determine type of reference, regardless of blessings
Message-Id: <vLOD3.364$la.47929@news.itd.umich.edu>
For a program I'm working on I want to be able to make a call to a
user-defined function that may return either a simple string or a glob or
globref. If it returns a string, I want to print it; otherwise, I want to
read a line from the filehandle part of the glob and print that. For
maximum generality I want to to be able to determine if the return value is
a globref regardless of any package it may have been blessed into. Here's
how I did it:
use strict;
my $val = &$userfunc;
eval { *$val };
print $@ ? $val : scalar <$val>;
Question: Is there a better way to do this? Or would I perhaps be better
off enforcing some constraints on the return value by, for instance,
requiring that ref($val) eq "GLOB" || ref(\$val) eq "GLOB" ||
$val->isa('IO::Handle')?
--
Sean McAfee mcafee@umich.edu
print eval eval eval eval eval eval eval eval eval eval eval eval eval eval
q!q@q#q$q%q^q&q*q-q=q+q|q~q:q? Just Another Perl Hacker ?:~|+=-*&^%$#@!
------------------------------
Date: Wed, 15 Sep 1999 15:51:07 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Best way to determine type of reference, regardless of blessings
Message-Id: <LfPD3.12639$N77.937266@typ11.nn.bcandid.com>
In article <vLOD3.364$la.47929@news.itd.umich.edu>,
Sean McAfee <mcafee@waits.facilities.med.umich.edu> wrote:
>For
>maximum generality I want to to be able to determine if the return value is
>a globref regardless of any package it may have been blessed into. Here's
>how I did it:
> eval { *$val };
>
>Question: Is there a better way to do this? Or would I perhaps be better
>off enforcing some constraints on the return value by, for instance,
>requiring that ref($val) eq "GLOB" || ref(\$val) eq "GLOB" ||
>$val->isa('IO::Handle')?
I don't know if you'd be better off constraining it to be a descendant
of IO::Handle, but I do know that perldoc -f ref says:
if (ref($r) eq "HASH") {
print "r is a reference to a hash.\n";
}
if (UNIVERSAL::isa($r, "HASH")) { # for subclassing
print "r is a reference to something that isa hash.\n";
}
Perhaps you could use UNIVERSAL::isa($val, "GLOB"). The deep-copy code
I posted here a few days ago does this, but it doesn't handle globs.
(What does it mean to deep-copy a filehandle? Or even a typeglob for
that matter? Obviously you should create a new anonymous typeglob and
copy something into it. But should the filehandle part of the glob
refer to the same filehandle? A different filehandle on the same
file? A filehandle on an anonymous file with the same contents as the
file attached to the original filehandle?)
Kragen
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Tue Sep 14 1999
55 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: 15 Sep 1999 15:43:37 +0100
From: Tae-Yeoub Jang <tyjang@chico.cstr.ed.ac.uk>
Subject: Re: buying perl book (Help me)
Message-Id: <qg0g10gdyli.fsf@chico.cstr.ed.ac.uk>
"Me" <NOSPAMmark@nl.gxn.net> writes:
Another delicious one from o'reilly:
"Mastering Algorithms with Perl"
by J. Orwant, J. Hietaniemi & J. Macdonald
Has come out recently.
------------------------------
Date: 15 Sep 1999 16:36:10 +0100
From: Tae-Yeoub Jang <tyjang@chico.cstr.ed.ac.uk>
Subject: can you reach 'www.perl.com'?
Message-Id: <qg0emg0dw5x.fsf@chico.cstr.ed.ac.uk>
I can't, all day long. Does anybody know what's wrong?
Tae
------------------------------
Date: 15 Sep 1999 16:43:02 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: can you reach 'www.perl.com'?
Message-Id: <37dfbe86_1@newsread3.dircon.co.uk>
Tae-Yeoub Jang <tyjang@chico.cstr.ed.ac.uk> wrote:
>
> I can't, all day long. Does anybody know what's wrong?
Fine by me:
traceroute to www.perl.com (208.201.239.50), 30 hops max, 40 byte packets
1 e2-2.cr1.bh.dircon.net (194.112.33.254) 0 ms 0 ms 0 ms
2 h3-0.cr1.tele.dircon.net (195.157.0.249) 10 ms 0 ms 0 ms
3 fa0-0-0.br1.tele.dircon.net (195.157.0.31) 10 ms 0 ms 10 ms
4 atm0-0-1.nyc1gw1.us.insnet.net (207.181.1.65) 80 ms 80 ms 70 ms
5 Serial1-1-0.GW2.NYC4.ALTER.NET (157.130.5.229) 80 ms 70 ms 80 ms
6 132.ATM3-0.XR1.NYC4.ALTER.NET (146.188.178.138) 70 ms 70 ms 80 ms
7 189.ATM2-0.TR1.EWR1.ALTER.NET (146.188.179.50) 80 ms 70 ms 80 ms
8 105.at-5-1-0.TR3.SCL1.ALTER.NET (152.63.3.154) 130 ms 130 ms 130 ms
9 399.ATM6-0.XR1.SJC1.ALTER.NET (152.63.48.185) 130 ms 130 ms 130 ms
10 193.ATM1-0-0.SAN-JOSE9-GW.ALTER.NET (146.188.144.129) 140 ms 140 ms 150 m
s
11 sonoma-gw.customer.ALTER.NET (137.39.34.39) 140 ms 150 ms 140 ms
12 giga.sonic.net (208.201.224.48) 140 ms 140 ms 140 ms
13 salt.songline.com (208.201.239.50) 150 ms 140 ms 140 ms
/J\
--
"Is there no demand for mechanical pussies?" - Mrs Slocombe
------------------------------
Date: Wed, 15 Sep 1999 15:53:44 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: can you reach 'www.perl.com'?
Message-Id: <ciPD3.12642$N77.938222@typ11.nn.bcandid.com>
In article <37dfbe86_1@newsread3.dircon.co.uk>,
Jonathan Stowe <gellyfish@gellyfish.com> wrote:
>Tae-Yeoub Jang <tyjang@chico.cstr.ed.ac.uk> wrote:
>> I can't, all day long. Does anybody know what's wrong?
>
>Fine by me:
>
>traceroute to www.perl.com (208.201.239.50), 30 hops max, 40 byte packets
> . . .
>13 salt.songline.com (208.201.239.50) 150 ms 140 ms 140 ms
It's responding, all right, but port 80 is responding with RSTs. So
you can reach www.perl.com, but you can't reach http://www.perl.com/ :)
Someone needs to kick the httpd? Or perhaps give it mouth-to-mouth?
Kragen
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Tue Sep 14 1999
55 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: 15 Sep 1999 14:41:29 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: ceiling a decimal number
Message-Id: <7rob6p$iej$1@lublin.zrz.tu-berlin.de>
Andrew Gray <agray@infoscience.otago.ac.nz> wrote in comp.lang.perl.misc:
>dVoon <dvoon@my-deja.com> writes:
>> How to take the 'ceiling' of a decimal number in Perl?
>> I'm using the latest ActivePerl and have looked around the
>> documentation but still unable to find any function/operation that
>> does that. Please help. Thanks.
>
>"perldoc -q ceil" will return an appropriate answer from perlfaq4
>using the POSIX module function ceil().
So far so good.
> Your other option would be to
>add 0.5 and take the int ("perldoc -f int"), assuming you are only
>working with positive values. In cases of rounding values you may
>want to explicitly control the behaviour to ensure that it does what
>you think it does, and writing your own function can be helpful in
>achieving that.
Please, when you presume to answer questions, be sure you know what
you are talking about. The ceil() function is *not* the same as
rounding, and the original poster gave examples (which you snipped)
that made clear he doesn't want rounding.
Anno
------------------------------
Date: Wed, 15 Sep 1999 06:13:26 GMT
From: "Greg White" <whiteg@sympatico.ca>
Subject: Re: CGI /PL permissions
Message-Id: <aOGD3.37558$aX6.58909@news20.bellglobal.com>
This is a multi-part message in MIME format.
------=_NextPart_000_00E7_01BEFF20.0EC23EC0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
The first digit equates to the file owner privledges. The second digit =
is for the group and the third is for everyone. Thus:
owner group others
xwr xwr xwr (execute, write, read)
111 101 001 (binary)
7 5 1 (decimal)
In the hypothetical example above a the file can be read, written and =
run by the file owner, group members may run and read the file but not =
write and others may only read the file.
Be sure to find out what user and group name your web server is running =
as as it must be able to be read and executed by the server.
Cheers,
Greg
Gary <gdentNOeoSPAM@salinas.net> wrote in message =
news:136f266c.5916f150@usw-ex0108-057.remarq.com...
> First...I am not a programer and need to learn at the"basic"=20
> level. I am just starting to use .cgi and .pl scripts and I=20
> am having a really hard time finding any information about=20
> how to set the permissions. The word "permission" does not=20
> appear in any of my CGI books. I am using a Windows program=20
> called WS_FTP Pro. My ISP does not authorize Telnet and=20
> tells me I can set the permissions using this software. The=20
> script calls for a setting of "755" and my software will=20
> allow me to enter "_rwx_rwd_" type of permissions, but I do=20
> not know what equates to 755. Can anyone provide me any=20
> assistance with setting permissions with WS_FTP Pro?? Many=20
> thanks!!!
>=20
> * Sent from RemarQ http://www.remarq.com The Internet's Discussion =
Network *
> The fastest and easiest way to search and participate in Usenet - =
Free!
>=20
------=_NextPart_000_00E7_01BEFF20.0EC23EC0
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2614.3401" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT size=3D2>The first digit equates to the file owner =
privledges. The=20
second digit is for the group and the third is for everyone. =
Thus:</FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3D"Courier New"=20
size=3D2>owner group others</FONT></DIV>
<DIV><FONT face=3D"Courier New" size=3D2>xwr =
xwr =20
xwr (execute, write,=20
read)</FONT></DIV>
<DIV><FONT face=3D"Courier New" size=3D2>111 =
101 =20
001 (binary)</FONT></DIV>
<DIV><FONT face=3D"Courier New"=20
size=3D2>7 5 &n=
bsp; 1 (d=
ecimal)</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=3D2>In the hypothetical example above a the =
file can be read,=20
written and run by the file owner, group members may run and read =
the file=20
but not write and others may only read the file.</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=3D2>Be sure to find out what user and group name your =
web server=20
is running as as it must be able to be read and executed by the=20
server.</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=3D2>Cheers,</FONT></DIV>
<DIV><FONT size=3D2>Greg</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=3D2>Gary <<A=20
href=3D"mailto:gdentNOeoSPAM@salinas.net">gdentNOeoSPAM@salinas.net</A>&g=
t; wrote=20
in message <A=20
href=3D"news:136f266c.5916f150@usw-ex0108-057.remarq.com">news:136f266c.5=
916f150@usw-ex0108-057.remarq.com</A>...</FONT></DIV><FONT=20
size=3D2>> First...I am not a programer and need to learn at =
the"basic"=20
<BR>> level. I am just starting to use .cgi and .pl scripts and =
I=20
<BR>> am having a really hard time finding any information about =
<BR>> how=20
to set the permissions. The word "permission" does not <BR>> appear =
in any of=20
my CGI books. I am using a Windows program <BR>> called WS_FTP=20
Pro. My ISP does not authorize Telnet and <BR>> tells me I can =
set the=20
permissions using this software. The <BR>> script calls for a =
setting=20
of "755" and my software will <BR>> allow me to enter "_rwx_rwd_" =
type of=20
permissions, but I do <BR>> not know what equates to 755. Can =
anyone=20
provide me any <BR>> assistance with setting permissions with WS_FTP=20
Pro?? Many <BR>> thanks!!!<BR>> <BR>> * Sent from RemarQ =
<A=20
href=3D"http://www.remarq.com">http://www.remarq.com</A> The Internet's =
Discussion=20
Network *<BR>> The fastest and easiest way to search and participate =
in=20
Usenet - Free!<BR>> </FONT></BODY></HTML>
------=_NextPart_000_00E7_01BEFF20.0EC23EC0--
------------------------------
Date: Wed, 15 Sep 1999 08:28:41 +0100
From: "Rasmus Rimestad" <rasmusr@online.no>
Subject: Re: CGI /PL permissions
Message-Id: <XMLD3.190$uV5.1319@news1.online.no>
Just start WS_FTP and log in to the server you want to change permissions
on. Then select the file you'd like to "permit", and right click (click on
it with your right mouse button). Choose CHMOD (Unix) from somewhere on the
list that appears, and check the permissions you would like to allow. The
usual is:
Owner: Read/Write/Execute
Group: Read/Execute
Other: Read/Execute
Then click OK, and WS_FTP will change the permission
Rasmus Rimestad
------------------------------
Date: Wed, 15 Sep 1999 14:48:46 GMT
From: Douglas Sparling <dsparling@my-deja.com>
Subject: Re: CGI /PL permissions
Message-Id: <7robk9$gcd$1@nnrp1.deja.com>
In article <136f266c.5916f150@usw-ex0108-057.remarq.com>,
Gary <gdentNOeoSPAM@salinas.net> wrote:
> First...I am not a programer and need to learn at the"basic"
> level. I am just starting to use .cgi and .pl scripts and I
> am having a really hard time finding any information about
> how to set the permissions. The word "permission" does not
> appear in any of my CGI books. I am using a Windows program
> called WS_FTP Pro. My ISP does not authorize Telnet and
> tells me I can set the permissions using this software. The
> script calls for a setting of "755" and my software will
> allow me to enter "_rwx_rwd_" type of permissions, but I do
> not know what equates to 755. Can anyone provide me any
> assistance with setting permissions with WS_FTP Pro?? Many
> thanks!!!
>
Once you've uploaded your file, right click on the file name and you
should get an option "chmod". Use that to set your file permissions.
> * Sent from RemarQ http://www.remarq.com The Internet's Discussion
Network *
> The fastest and easiest way to search and participate in Usenet -
Free!
>
>
--
Douglas Sparling
Web Programmer
Universal New Media
http://www.uexpress.com
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Wed, 15 Sep 1999 17:59:30 +0100
From: "JduPayrat" <jdupayrat@webraska.com>
Subject: Re: CGI cannot open relative path
Message-Id: <7rofjm$9m4$1@minus.oleane.net>
>David Cassell a écrit dans le message
<37DEB8BF.FF8C06FF@mail.cor.epa.gov>...
>Please don't do that. Relative paths can be made to work
>some of the time in some webservers, but it is not a good idea.
>Different webservers with different configurations assume
>different 'home' directories belonging to different 'users'.
>This makes any script using relative paths fairly fragile,
>and without proper error-checking you may not know when your
>script fails, or why.
I think that the benefits of being able to move or duplicate my cgi and
having them work without
modification worths a little more paintfull debugging process. Of course I
could modify all my scripts
but it would be a lot of work . I'd really prefer to avoid that.
>Your problem may not even be the relative path, but the
>ownership of the file or another problem. What error
>message did you get when your open() failed?
No, the problem doesn't seems to be due to ownership. When I try to open a
file with a relative path, it fails saying 'No such file or directory'. When
I try to open the same file with an absolute path it works.
------------------------------
Date: Wed, 15 Sep 1999 09:44:33 +0200
From: Daniel Krajzewicz <krajzewicz@inx.de>
Subject: Re: CGI Hosting?
Message-Id: <37DF4E61.57964A5D@inx.de>
AztecOne / Chris wrote:
>
> _mDe_ wrote in message <7rm2te$e4d$1@news.news-service.com>...
> >Is there a free webspace provider with cgi support without all the banners
> >and popups?
> >mDe
> >
> >
> We have not free, but cheap.
>
> Chris
www.name-removed.com
Try us, try us...
--
__________________________
< Daniel Krajzewicz >
>------------------------<
< krajzewicz@inx.de >
>------------------------<
< http://www.art-so-far.de >
>------------------------<
<__________________________>
------------------------------
Date: 15 Sep 1999 12:40:52 GMT
From: zenin@bawdycaste.org (Zenin)
Subject: Re: CGI in PERL
Message-Id: <937399602.226000@thrush.omix.com>
Kim Saunders <kims@emmerce.com.au> wrote:
:>Thus Algol, Basic, Cobol, Fortran, Lisp, ... -- and now Perl!
:
: Dunno if I agree with some of those languages, esp BASIC... basic is often
: spelt in caps. But the principal is right...
ONLY BECAUSE EARLY BASIC INTERPRETERS COULD ONLY DO CAPS, AFAIK.
Thank god they added lower case characters so we could all stop
yelling at each other. :-)
--
-Zenin (zenin@archive.rhps.org) "Hey, are you one of those Linux coders?"
"Nyet. Linux coder in next office."
"Good man. Ignore the screams."
--www.userfriendly.org
------------------------------
Date: Wed, 15 Sep 1999 14:34:05 GMT
From: Dan Sugalski <dan@tuatha.sidhe.org>
Subject: Re: CGI in PERL
Message-Id: <x7OD3.13640$wW2.13459@news.rdc1.ct.home.com>
Zenin <zenin@bawdycaste.org> wrote:
> Kim Saunders <kims@emmerce.com.au> wrote:
> :>Thus Algol, Basic, Cobol, Fortran, Lisp, ... -- and now Perl!
> :
> : Dunno if I agree with some of those languages, esp BASIC... basic is often
> : spelt in caps. But the principal is right...
> ONLY BECAUSE EARLY BASIC INTERPRETERS COULD ONLY DO CAPS, AFAIK.
Nope. It's because BASIC is an acronym--Beginner's Allpurpose something
something something. I forget exactly what. COBOL is also supposed to be
all upper-case, FWIW. (COmmon Business Oriented Language) FORTRAN too, as
it's sorta an acronym.
Dan
------------------------------
Date: Wed, 15 Sep 1999 05:57:05 GMT
From: tgy@chocobo.org (Neko)
Subject: Re: challenge results
Message-Id: <37e11f98.291916716@news.supernews.com>
On Tue, 14 Sep 1999 18:57:01 +0200, Steven de Rooij <srooij@wins.uva.nl>
wrote:
>3. Write the shortest possible Unix command that find words in a
>wordlist that occur both forwards and backwards.
>Second is `Abigail' with this amazing piece of perl code:
>perl -nle'$_{$_}++}{$_{+reverse}&&print for keys%_' [51]
perl -nle'$a=reverse;$$_&&print$_.-$a;$$a++' [44]
>If I combine all the new tricks I learned from the solutions I was sent
>(as in accordance with Perl culture), I can improve a little more on
>the anagram program.
>The following gem is the result of the joint efforts of Abigail,
>Steven Alexander, David Alan Black, Gareth Rees and me:
>
>(Everything on a new line:)
>perl -ne'$x{join"",sort split//}.=$_}{/.\n./&&print for%x'
>
>(All anagrams on one line:)
>perl -lne'$x{join"",sort split//}.="$_ "}{/ ./&&print for%x'
>
>If anyone knows how to squeeze another byte out of this I will start
>uttering strange sounds.
s# split//#/./g#; # James Wetterau
s/join""/1/; # me :)
# Everything on a new line.
perl -ne'$x{1,sort/./g}.=$_}{/.\n./&&print for%x'
# All anagrams on one line.
perl -lne'$x{1,sort/./g}.="$_ "}{/ ./&&print for%x'
# All anagrams on one line. Assume words don't include hypens.
perl -lne'$x{1,sort/./g}.=-$_}{/.-/&&print for%x'
--
Neko | tgy@chocobo.org | Will hack Perl for a moogle stuffy! =^.^=
------------------------------
Date: Wed, 15 Sep 1999 06:10:21 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Closing a pipeline before the command is done
Message-Id: <Pine.GSO.4.10.9909150557290.25903-100000@user2.teleport.com>
On Wed, 15 Sep 1999, Larry Martell wrote:
> Initially I issued a close(PIPE) when I saw the string, but that hung.
Yes; close will wait() for the process, which may take some time.
> I then captured the pid of the command and sent it a SIGKILL when I
> was done.
SIGKILL (signal number nine) is a last resort, not the first. SIGHUP is
usually sufficient; if not, try SIGINT or SIGTERM. Use SIGKILL only if the
process won't respond to an ordinary-sized hammer.
> That worked as far as my script was concerned, but when it exited I
> found that I had all these invocations of the command still hanging
> around.
Are you talking about zombies? See the FAQ for those.
> For example, if I issue the statement:
>
> $pid = open(TICK, "mycmd |");
>
> and I do a ps I see:
>
> larrym 3462 0.0 1.3 1540 744 p0 S 19:36 0:00 mycmd
> larrym 3461 0.0 0.0 28 0 p0 IW 19:36 0:00 sh -c mycmd
>
> The pid I get back is 3461, which does go away when I send the kill,
> but 3462 does not. As I said, even after the script exits, 3462 is
> still around.
You may wish to avoid the shell by opening "-|" and exec()ing the child
directly with a list of arguments. See the entry on open in the perlfunc
manpage.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 15 Sep 1999 14:59:42 GMT
From: larrym@imsi.com (Larry Martell)
Subject: Re: Closing a pipeline before the command is done
Message-Id: <7roc8m$ssn@titan.imsi.com>
In article <Pine.GSO.4.10.9909150557290.25903-100000@user2.teleport.com>,
Tom Phoenix <rootbeer@redcat.com> wrote:
> Subject: Re: Closing a pipeline before the command is done
> On Wed, 15 Sep 1999, Larry Martell wrote:
>
> > Initially I issued a close(PIPE) when I saw the string, but that hung.
>
> Yes; close will wait() for the process, which may take some time.
In this case forever, as the process does not exit.
> > I then captured the pid of the command and sent it a SIGKILL when I
> > was done.
> SIGKILL (signal number nine) is a last resort, not the first. SIGHUP is
> usually sufficient; if not, try SIGINT or SIGTERM. Use SIGKILL only if the
> process won't respond to an ordinary-sized hammer.
In this case it's irrelevant, as the process doesn't catch any signals.
> > That worked as far as my script was concerned, but when it exited I
> > found that I had all these invocations of the command still hanging
> > around.
> Are you talking about zombies? See the FAQ for those.
No, these are still live processes.
> > For example, if I issue the statement:
> >
> > $pid = open(TICK, "mycmd |");
> >
> > and I do a ps I see:
> >
> > larrym 3462 0.0 1.3 1540 744 p0 S 19:36 0:00 mycmd
> > larrym 3461 0.0 0.0 28 0 p0 IW 19:36 0:00 sh -c mycmd
> >
> > The pid I get back is 3461, which does go away when I send the kill,
> > but 3462 does not. As I said, even after the script exits, 3462 is
> > still around.
>
> You may wish to avoid the shell by opening "-|" and exec()ing the child
> directly with a list of arguments.
Sure, but that's so much more involved.
Thanks,
larry
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 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.
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" from
almanac@ruby.oce.orst.edu. The real FAQ, as it appeared last in the
newsgroup, can be retrieved with the request "send perl-users FAQ" from
almanac@ruby.oce.orst.edu. 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" from
almanac@ruby.oce.orst.edu.
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 801
*************************************
