[13986] in Perl-Users-Digest
Perl-Users Digest, Issue: 1396 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Nov 16 14:10:28 1999
Date: Tue, 16 Nov 1999 11:05:19 -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: <942779119-v9-i1396@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 16 Nov 1999 Volume: 9 Number: 1396
Today's topics:
Re: ? Joining the associative array to the database. Wh (Bart Lateur)
Re: Adding to @INC during perl install <tpost@intelihealth.com>
Re: CGI cookies and Internet Explorer for the Mac (Kragen Sitaker)
CGI Programmer Needed in Philadelphia Area (job01@gix.com)
Re: CHMOD for Net::FTP. Help, cool hackers ! (Kragen Sitaker)
Re: CHMOD for Net::FTP. Help, cool hackers ! (Alan Curry)
connect failed with Sender.pm lchaves@iname.com
connect failed with Sender.pm lchaves@iname.com
Re: Fetch Dilbert. (Clinton Pierce)
Re: Fetch Dilbert. (Matthew Bafford)
Re: Fetch Dilbert. perldoc@my-deja.com
Re: Fetch Dilbert. <dsparling@my-deja.com>
Re: Fetch Dilbert. (Alan Curry)
Re: Generating pi (Ilya Zakharevich)
Re: Help (back for guru): using setsid() to invoke diss <newsposter@cthulhu.demon.nl>
Re: Help (back for guru): using setsid() to invoke diss (Kragen Sitaker)
Re: Help (back for guru): using setsid() to invoke diss <rootbeer@redcat.com>
Re: HELP --> Save output in a variable <durbin@cig.mot.com>
HELP: Perl & CRL Lists (doug a blaisdell)
html form upload with ftp or http? (BLIMP8)
Re: html form upload with ftp or http? <ah@datapharm.de>
IO:Socket & timeout <pavlo@stud.vsu.ru>
Re: Longest match <rootbeer@redcat.com>
Re: Longest match <rick.delaney@home.com>
Re: Maximum number of open files <rootbeer@redcat.com>
Re: Multiple page form (Kragen Sitaker)
Re: Need help with arrays. (Kragen Sitaker)
Net::FTP <hmpeng@ppserver.tamu.edu>
Re: Now it works... (Craig Berry)
Re: openin file on client machine <gellyfish@gellyfish.com>
Perl 5.005 modules listing <mikej@1185design.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 16 Nov 1999 17:07:00 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: ? Joining the associative array to the database. What happens ?
Message-Id: <38318a55.1386307@news.skynet.be>
Lassi Hautakangas wrote:
>I would have a question which applies to the combining of an
> associative array and database.
>
>Example
> "dbmopen(%assosiative_array,"database");"
>
>What took place after this command ?
>Was the whole huge database now read to the central memory ?
I guess not. Only the things you try to access are read in, at that very
moment. Pretty much like with tie(), which is what you ought to be
using, I guess.
As for databases, there are crrently basically two approaches:
A) a tied hash, where you have key/value pairs, just like with an
ordinary hash. For example, SDBM and Berkeley dB. Problem: the hash
values must be strings.
B) a SQL database, through £DBI. You create an SQL statement, you ask
the dB to compile/execute it, and then you can read the matched records
one by one. For example, MySQL (see <www.mysql.com>). Look at the
tutorial on WebMonkey
<http://www.hotwired.com/webmonkey/backend/tutorials/tutorial1.html> for
an intro on what to expect.
--
Bart.
------------------------------
Date: Tue, 16 Nov 1999 13:04:03 -0500
From: Tony Demark <tpost@intelihealth.com>
Subject: Re: Adding to @INC during perl install
Message-Id: <38319C93.B95B9671@intelihealth.com>
I believe that to... I am just asking what I need to modify (source code
or config file) to have that happen. Hopefully, this is not a strage
request and someone out there has been in a similar situation.
- Tony
Jun Xu wrote:
>
> The content of @INC is compiled into the perl executable. To alter it, I
> would think you need to change either the source code or some configuration
> file and recompile it.
>
> Tony Demark <tpost@intelihealth.com> wrote in message
> news:3831788D.DD364C50@intelihealth.com...
> > This would seem to be an easy question, but I just can't find the answer
> > in the FAQ or INSTALL file:
> >
> > When installing perl (5.005_03), how do I add additional directories to
> > @INC?
> > Right now, there are five entries in my @INC:
> >
> > * Where perl standard components go:
> > - /opt/local/lib/perl5/5.00503/sun4-solaris
> > - /opt/local/lib/perl5/5.00503
> >
> > * Where additional components go:
> > - /opt/local/lib/perl5/site_perl/5.005/sun4-solaris
> > - /opt/local/lib/perl5/site_perl/5.005
> >
> > * and
> > - .
> >
> > I am looking to provide a location where locally developed modules can
> > go (separate from the site_perl dirs), "/opt/local/PM", eg.
> >
> > How can I do this when Config'ing perl?
> >
> > Thanks,
> > - Tony
> >
> >
------------------------------
Date: Tue, 16 Nov 1999 17:16:04 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: CGI cookies and Internet Explorer for the Mac
Message-Id: <ojgY3.18626$YI2.800306@typ11.nn.bcandid.com>
In article <Pine.GSO.4.10.9911151801430.15797-100000@user2.teleport.com>,
Tom Phoenix <rootbeer@redcat.com> wrote:
>On Mon, 15 Nov 1999, Keith Newton wrote:
>> Newsgroups: comp.lang.perl.misc, comp.lang.perl
>
>If your news administrator still carries comp.lang.perl, please let him
>or her know that that newsgroup has not existed since 1995.
If a newsgroup doesn't fall in a forest and thousands of people are
there and hear it fall, does it make a noise?
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 16 Nov 1999 17:45:12 GMT
From: job01@gix.com (job01@gix.com)
Subject: CGI Programmer Needed in Philadelphia Area
Message-Id: <38319819.74520776@netnews.netreach.net>
We have a full time position open in West Chester, Chester County, PA
A skilled progrmmer with experience in:
Perl 5
Java/Script
ASP/VB
HTML
With a working knowlege of IIS on NT and Apache on Solaris/Linux
is needed.
GREAT working environment and competitive pay.
Please e-mail job01@gix.com with resume.
------------------------------
Date: Tue, 16 Nov 1999 17:37:13 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: CHMOD for Net::FTP. Help, cool hackers !
Message-Id: <dDgY3.18833$YI2.802601@typ11.nn.bcandid.com>
In article <80rsui$2jv$1@nnrp1.deja.com>,
MetaWizard <microwizard@my-deja.com> wrote:
>Thank to everybody for your help!
>One more problem I found. I can't chmod by mask. I have about 8
>directories, suumary with about 400 files and I have to change their
>mode. For each directory there is a constant mode for files in this
>directory. How can I quickly chmod all this files ?
>Please give one more advice!
"use File::Find" is one answer. "Use @ARGV and command-line globbing"
is another. "use bitwise operations" is probably another. But which
part are you having trouble with?
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 16 Nov 1999 18:01:14 GMT
From: pacman@defiant.cqc.com (Alan Curry)
Subject: Re: CHMOD for Net::FTP. Help, cool hackers !
Message-Id: <KZgY3.18884$YI2.805389@typ11.nn.bcandid.com>
Kragen Sitaker <kragen@dnaco.net> wrote:
>MetaWizard <microwizard@my-deja.com> wrote:
>>Thank to everybody for your help!
>>One more problem I found. I can't chmod by mask. I have about 8
>>directories, suumary with about 400 files and I have to change their
>>mode. For each directory there is a constant mode for files in this
>>directory. How can I quickly chmod all this files ?
>
>"use File::Find" is one answer. "Use @ARGV and command-line globbing"
>is another. "use bitwise operations" is probably another. But which
>part are you having trouble with?
The part where it has to happen over FTP?
I wonder what the odds are against SITE EXEC chmod -R working.
--
Alan Curry |Declaration of | _../\. ./\.._ ____. ____.
pacman@cqc.com|bigotries (should| [ | | ] / _> / _>
--------------+save some time): | \__/ \__/ \___: \___:
Linux,vim,trn,GPL,zsh,qmail,^H | "Screw you guys, I'm going home" -- Cartman
------------------------------
Date: Tue, 16 Nov 1999 17:39:30 GMT
From: lchaves@iname.com
Subject: connect failed with Sender.pm
Message-Id: <80s4s8$9dq$1@nnrp1.deja.com>
[please, answer to lchaves@iname.com as well]
Hi, everybody,
I've been using Mail::Sender package with no problems till now. But
since our ISP has changed the OS (now it's a BSDI 4.0.1) we're getting
"connect failed()" error. We've tried to connect (via telnet 25 from
the same machine where our program is running, to the specified smtp
server) and it was ok (we sent a test e-mail, talking smtp by hand).
A simple:
--- cut here ---
#!/usr/bin/perl5
use Mail::Sender;
$from = 'lcm@intraweb.com.br';
$emotionAdm = 'lcm@intraweb.com.br';
$smtpServer = 'email.nex.com.br';
ref ($sender1 = new Mail::Sender({
from => $emotionAdm,
smtp => $smtpServer})) or die "$Mail::Sender::Error\n";
(ref ($sender1 ->MailMsg({
to =>$from,
subject => "E.motioncard enviado para você",
msg => "oi"}))
) or die "$Mail::Sender::Error\n";
--- cut here ---
does not work.
We have perl 5.005_03.
Would you have any idea of what may be going on?
Thanks in advance. Aufwiedersehen ...
:-) Leonardo
--
Leonardo Chaves - Computer Engineer - lchaves@iname.com
Work and Interest Areas: Web Development(Java, CGI, Servlets),
Internet/Database integration
************ Unite for Java! www.javalobby.org ***************
[please, answer to lchaves@iname.com as well]
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 16 Nov 1999 17:40:22 GMT
From: lchaves@iname.com
Subject: connect failed with Sender.pm
Message-Id: <80s4tu$9g1$1@nnrp1.deja.com>
[please, answer to lchaves@iname.com as well]
Hi, everybody,
I've been using Mail::Sender package with no problems till now. But
since our ISP has changed the OS (now it's a BSDI 4.0.1) we're getting
"connect failed()" error. We've tried to connect (via telnet 25 from
the same machine where our program is running, to the specified smtp
server) and it was ok (we sent a test e-mail, talking smtp by hand).
A simple:
--- cut here ---
#!/usr/bin/perl5
use Mail::Sender;
$from = 'lcm@intraweb.com.br';
$emotionAdm = 'lcm@intraweb.com.br';
$smtpServer = 'email.nex.com.br';
ref ($sender1 = new Mail::Sender({
from => $emotionAdm,
smtp => $smtpServer})) or die "$Mail::Sender::Error\n";
(ref ($sender1 ->MailMsg({
to =>$from,
subject => "E.motioncard enviado para você",
msg => "oi"}))
) or die "$Mail::Sender::Error\n";
--- cut here ---
does not work.
We have perl 5.005_03.
Would you have any idea of what may be going on?
Thanks in advance. Aufwiedersehen ...
:-) Leonardo
--
Leonardo Chaves - Computer Engineer - lchaves@iname.com
Work and Interest Areas: Web Development(Java, CGI, Servlets),
Internet/Database integration
************ Unite for Java! www.javalobby.org ***************
[please, answer to lchaves@iname.com as well]
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 16 Nov 1999 17:07:03 GMT
From: cpierce1@ford.com (Clinton Pierce)
Subject: Re: Fetch Dilbert.
Message-Id: <38358a4a.300102314@news.ford.com>
On 16 Nov 1999 09:26:53 -0500, Uri Guttman <uri@sysarch.com> wrote:
>>>>>> "A" == Abigail <abigail@delanet.com> writes:
> A> Here's a little script that fetches the daily Dilbert image, and
> A> displays it in a viewer. You might want to change the '$viewer'
> A> line if you wish to use this program.
>i wrote something recently to get a month of calvin & hobbes (and
>another strip or too). i got sick of the ads and the pain of fetching
>one at a time. i may post the raw code sometime.
Agreed. I grab a big chunk of United Media and United Features and paste
them together. It's stop #2 in the morning for me.
(www.userfriendly.org, first. They don't clutter their site too badly,
and hence I haven't feel the need to mirror them yet.)
Anyway, the code (and the funnies) are at http://www.geeksalad.org, click
on Jason's picture. You're welcome to them.
There's also a 2-year archive of strips in there somewhere (the code
maintains those), I just have to get that part put up for viewing...one of
these days.
--
Clinton A. Pierce "If you rush a Miracle Man, you
clintp@geeksalad.org get rotten Miracles." -- Miracle Max,
http://www.geeksalad.org The Princess Bride
------------------------------
Date: Tue, 16 Nov 1999 17:48:01 GMT
From: *@dragons.duesouth.net (Matthew Bafford)
Subject: Re: Fetch Dilbert.
Message-Id: <slrn8335r4.104.*@dragons.duesouth.net>
On 16 Nov 1999 09:26:53 -0500, Uri Guttman <uri@sysarch.com> enriched us
with:
: >>>>> "A" == Abigail <abigail@delanet.com> writes:
:
: A> Here's a little script that fetches the daily Dilbert image, and
: A> displays it in a viewer. You might want to change the '$viewer'
: A> line if you wish to use this program.
:
: i wrote something recently to get a month of calvin & hobbes (and
: another strip or too). i got sick of the ads and the pain of fetching
: one at a time. i may post the raw code sometime.
A while ago I also wrote one to get all of the United Media comics:
http://dragons.home.duesouth.net/tkcomics.html
Amazingly, it still works (unlike DejaView, which has to change about
once a month to keep up with Deja's site changes).
: uri
--Matthew
------------------------------
Date: Tue, 16 Nov 1999 18:14:40 GMT
From: perldoc@my-deja.com
Subject: Re: Fetch Dilbert.
Message-Id: <80s6u1$b23$1@nnrp1.deja.com>
In article <slrn832jjg.cvu.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:
> #!/opt/perl/bin/perl -w
The "opt" smells of Sun. I could be wrong.
> open DISPLAY, "| $viewer" or die "Failed to open viewer.\n";
> print DISPLAY $image;
> close DISPLAY or die "Failed to close viewer.\n";
OK, I'll take the troll.
Newbies beware - curmudgeonly old Unix cranky-pants like
Abigail won't even begin to consider that someone might
try to run their beloved Perl on something other than a
Unix box. Hey, Abby, God forbid you might have to write
some *portable* code for once in your miserable life.
How many Windoze image display programs do you know of that
can ingest input from STDIN?
> This program is copyright 1999 by Abigail.
Awww, eat my shorts.
I promise I will omit your little "license" on every
copy of your program I redistribute.
I guess if you tried to sue me then your real name would
have to appear on the summons, then, wouldn't it?
Yours,
perldoc
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 16 Nov 1999 18:31:47 GMT
From: dsparling <dsparling@my-deja.com>
Subject: Re: Fetch Dilbert.
Message-Id: <80s7u3$bud$1@nnrp1.deja.com>
In article <x7vh72tsuq.fsf@home.sysarch.com>,
Uri Guttman <uri@sysarch.com> wrote:
> >>>>> "A" == Abigail <abigail@delanet.com> writes:
>
> A> Here's a little script that fetches the daily Dilbert image, and
> A> displays it in a viewer. You might want to change the '$viewer'
> A> line if you wish to use this program.
>
> i wrote something recently to get a month of calvin & hobbes (and
> another strip or too). i got sick of the ads and the pain of fetching
> one at a time. i may post the raw code sometime.
>
> 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
>
I found a Cartoon script earlier this year by Steffen Beyer
(http://www.engelschall.com/u/sb/download/) that grabs Calvin and
Hobbes.
--
Douglas Sparling - http://www.uexpress.com
http://www.calvinandhobbes.com (yes, I work there!)
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Tue, 16 Nov 1999 18:47:54 GMT
From: pacman@defiant.cqc.com (Alan Curry)
Subject: Re: Fetch Dilbert.
Message-Id: <uFhY3.18963$YI2.809661@typ11.nn.bcandid.com>
In article <80s6u1$b23$1@nnrp1.deja.com>, <perldoc@my-deja.com> wrote:
>In article <slrn832jjg.cvu.abigail@alexandra.delanet.com>,
> abigail@delanet.com wrote:
>How many Windoze image display programs do you know of that
>can ingest input from STDIN?
Please post equivalent Windoze code that allows the user to choose a viewer
by just substituting a variable and doesn't require special knowledge of how
the viewers work.
By the way, even if your graphics viewer doesn't take standard input (let's
ponder that phrase for a minute. Standard. Input. ...), you could easily
adapt with
$viewer='t=`mktemp` && cat > $t && /usr/local/viewer $t && rm $t';
Isn't it nice when your tools work together?
--
Alan Curry |Declaration of | _../\. ./\.._ ____. ____.
pacman@cqc.com|bigotries (should| [ | | ] / _> / _>
--------------+save some time): | \__/ \__/ \___: \___:
Linux,vim,trn,GPL,zsh,qmail,^H | "Screw you guys, I'm going home" -- Cartman
------------------------------
Date: 16 Nov 1999 18:11:06 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Generating pi
Message-Id: <80s6nq$p0g$1@charm.magnus.acs.ohio-state.edu>
[A complimentary Cc of this posting was sent to Abigail
<abigail@delanet.com>],
who wrote in article <slrn832jsq.cvu.abigail@alexandra.delanet.com>:
> If it's random, it *will* generate all numbers, because it's run
> for ever. For any sequence, the chance that it will not be generated
> approaches 0 over time. ;-) If there's any sequence that will not be
> generated with a chance > 0, rand() isn't random.
You need to refresh your probability concept. Probability being 0
does not mean that the even is not possible. ;-)
Ilya
------------------------------
Date: 16 Nov 1999 18:17:16 GMT
From: Erik van Roode <newsposter@cthulhu.demon.nl>
Subject: Re: Help (back for guru): using setsid() to invoke dissassociated child -
Message-Id: <80s73c$pio$1@internal-news.uu.net>
Tom Phoenix <rootbeer@redcat.com> wrote:
> On Tue, 16 Nov 1999, Ryan T. Rhea wrote:
>> Anybody know why the environment (i.e. PATH) doesn't get set correctly
>> when bash starts?
> Does anybody know a newsgroup for questions about bash? :-)
This seesm to be the perfect group: gnu.bash.bug
Erik
------------------------------
Date: Tue, 16 Nov 1999 18:28:13 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Help (back for guru): using setsid() to invoke dissassociated child -
Message-Id: <1nhY3.18929$YI2.808851@typ11.nn.bcandid.com>
In article <80s73c$pio$1@internal-news.uu.net>,
Erik van Roode <newsposter@cthulhu.demon.nl> wrote:
>Tom Phoenix <rootbeer@redcat.com> wrote:
>> Does anybody know a newsgroup for questions about bash? :-)
>
>This seesm to be the perfect group: gnu.bash.bug
No. gnu.bash.bug is for bug reports.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 16 Nov 1999 10:07:27 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Help (back for guru): using setsid() to invoke dissassociated child -
Message-Id: <Pine.GSO.4.10.9911161007000.15797-100000@user2.teleport.com>
On Tue, 16 Nov 1999, Ryan T. Rhea wrote:
> Anybody know why the environment (i.e. PATH) doesn't get set correctly
> when bash starts?
Does anybody know a newsgroup for questions about bash? :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 16 Nov 1999 10:56:53 -0600
From: Chris Durbin <durbin@cig.mot.com>
Subject: Re: HELP --> Save output in a variable
Message-Id: <Pine.GSO.4.20.9911161039590.10435-100000@ballad>
On 28 Oct 1999, Abigail wrote:
crap->BARBET Alain (abarb@nmg.fr) wrote on MMCCXXXIV September MCMXCIII in
crap-><URL:news:380485E0.FFEA9442@nmg.fr>:
crap->!! Marco Cerqui a =E9crit :
crap->!!=20
crap->!! > Hi
crap->!! > In a script I want to save the output of a command -->system(yp=
which)<--
crap->!! > into a variable. Can someone help me please ?
crap->!!=20
crap->!! You can redirect output in a file and then read it ... and you can=
have the
crap->!! return code of your call with $retourcode=3Dsystem("ypwhich>>/tmp/=
toto");
crap->
crap->
crap->You shouldn't ask questions if you haven't read the documentation,
crap->but you certainly should not *answer* them either.
crap->
crap->
crap->Abigail
crap->
Nice, Abagail, you managed to waste bandwidth, flame a poster and
the one replying to the post, without even being remotely
helpful... didn't your mama ever tell you: "if you can't say
anything nice, shut the hell up!"
to Marco:
=09You really should do more research before you go to the
newsgroup, otherwise you'll have harpies like Abagail hounding
you, without giving you any help...
try looking at these
man perlop
perldoc -q backtick
oh, and... get a good book, it is your best friend
--=20
Chris Durbin Motorola, Cellular Infrastructure Group
--------------------------------------------------------------
Phone: (847)435-9558 Pager: 1-800-759-8888, #1268222
Fax: (847)632-4552 Email: durbin@cig.mot.com
------------------------------
Date: Tue, 16 Nov 1999 17:48:04 GMT
From: dougb@world.std.com (doug a blaisdell)
Subject: HELP: Perl & CRL Lists
Message-Id: <FLAxG4.3Ax@world.std.com>
Hi all--
Is there a perl module to parse CRL (Certificate
Revocation Lists)?
thanks
------------------------------
Date: 16 Nov 1999 17:52:29 GMT
From: blimp8@aol.com (BLIMP8)
Subject: html form upload with ftp or http?
Message-Id: <19991116125229.16981.00000139@ng-fi1.aol.com>
my site allows users to upload files via a web form . currently the http
protocol is used with a perl script using cgi.pm . it is a bit slow. would
using the Net:FTP module make things faster ? if so , are there more security
holes using an FTP client ? I spent some time searching the web and only found
that people use http via web forms. is there a reason for this ?
also , with Net:FTP is there a way to check the size of a file before it's
uploaded?
thanks.....
sam
blimp8@aol.com
------------------------------
Date: Tue, 16 Nov 1999 19:09:04 -0800
From: Andreas Huber <ah@datapharm.de>
Subject: Re: html form upload with ftp or http?
Message-Id: <38321C4F.8913A65C@datapharm.de>
Net:FTP??? You can't check the file size of a file located on a users computer
with FTP!
BLIMP8 wrote:
>
> my site allows users to upload files via a web form . currently the http
> protocol is used with a perl script using cgi.pm . it is a bit slow. would
> using the Net:FTP module make things faster ? if so , are there more security
> holes using an FTP client ? I spent some time searching the web and only found
> that people use http via web forms. is there a reason for this ?
>
> also , with Net:FTP is there a way to check the size of a file before it's
> uploaded?
>
> thanks.....
> sam
> blimp8@aol.com
--
Andreas Huber
Datapharm Netsystems AG
E-Mail: ah@datapharm.de
Tel.: +49 89 85 68 -4156
Fax: +49 89 85 68 -4100
------------------------------
Date: Tue, 16 Nov 1999 20:55:29 +0300
From: "Pavel Zheltouhov" <pavlo@stud.vsu.ru>
Subject: IO:Socket & timeout
Message-Id: <80s5r2$j1n$1@info.vsu.ru>
I need open sockets and when connection are not established for a small
time (about 1 sec )
I don't use this socket
How I can do it ?
please double to mail !
Thanks !
------------------------------
Date: Tue, 16 Nov 1999 10:30:56 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Longest match
Message-Id: <Pine.GSO.4.10.9911161025140.15797-100000@user2.teleport.com>
On Tue, 16 Nov 1999, Bart Lateur wrote:
> $_ = 'this is one that's two and this is three';
> How can you easily find the longest substring of only spaces (at least
> two)? Maybe even using only one regex?
I'll let you decide whether this is or is not "only one regex", and
whether it's more or less efficient than a solution which finds every
sequence of spaces as it goes. (Hint: Whether this solution or another is
more efficient depends upon the data involved!)
#!/usr/bin/perl -w
$_ = 'this is one that\'s two and this is three';
my $run_len = 1;
my $where;
while (/^(.*?)( {$run_len,})/s) {
$run_len = length $2;
$where = length $1;
}
if (defined $where) {
print "A run of length $run_len starts at $where\n";
print "01234567890123456789012345678901234567890123456789\n$_\n";
} else {
print "There's no long run of spaces.\n";
}
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 16 Nov 1999 15:56:15 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: Re: Longest match
Message-Id: <38317EBA.C27AAE11@home.com>
[posted & mailed]
Bart Lateur wrote:
>
> How can you easily find the longest substring of only spaces (at least
> two)? Maybe even using only one regex?
print "($1)\n" if /( +)(?!.*\1)/s;
or if you also want the position where the spaces start
print pos, "($1)\n" if /(?=( +)(?!.*\1))/sg;
--
Rick Delaney
rick.delaney@home.com
------------------------------
Date: Tue, 16 Nov 1999 10:43:16 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Maximum number of open files
Message-Id: <Pine.GSO.4.10.9911161036310.15797-100000@user2.teleport.com>
On Tue, 16 Nov 1999, Yossi Klein wrote:
> I'm working on a Solaris machine, and using ulimit, I upped the maximum
> number of file descriptors to 700. I then ran a test program using open
> and found that open() will only allow me to have to 256 files open at a
> time.
How many files can you have open from a C program? It may be that there is
another limit besides your ulimit. But if you can open 700 files from C,
you should be able to open 700 from Perl; else, run perlbug.
Also, see the FileCache module.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 16 Nov 1999 17:41:04 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Multiple page form
Message-Id: <QGgY3.18841$YI2.803170@typ11.nn.bcandid.com>
Keywords: perl, cgi, form, multiple page
In article <80s2fm$36r$2@taliesin.netcom.net.uk>,
Mark Tait <mark.tait@capgemini.co.uk> wrote:
>Hi - does anyone know of a script which will process a multiple page form
>(for a survey questionairre) - all the data has to be processed together -
>to enable each persons answers to be kept together - and written to a text
>file.
Sorry, this is a place to talk about programming Perl, not a library of
pre-written code.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 16 Nov 1999 17:55:34 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Need help with arrays.
Message-Id: <qUgY3.18869$YI2.804887@typ11.nn.bcandid.com>
In article <0a0133f8.98878bda@usw-ex0101-001.remarq.com>,
John Iyezack <snapperhead_420NOsnSPAM@hotmail.com.invalid> wrote:
>Thanks for the help! You should have seen what I was previously using.
>It must have been 100 lines just to do that! I was tring to use hash's
>then array's in while loops, for loops, untils....
>
>I think I need more practice then I thought. I _thought_ I was pretty
>decent at perl. But, it looks like I was dead wrong :)
We all have a lot to learn about programming.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
The Internet stock bubble didn't burst on 1999-11-08. Hurrah!
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 16 Nov 1999 12:00:37 -0600
From: "Mei" <hmpeng@ppserver.tamu.edu>
Subject: Net::FTP
Message-Id: <80s68c$5qk$1@news.tamu.edu>
Hello,
I am using the Net::FTP module for file transferring. When I only wanted a
few files, I can specify every file that I wanted. It works really well.
However, I frequently need to transfer more than thousand of files. Can I
use ‘prompt’ and ‘mget’? If so, how?
In addition, when I change directory at the host site, I’d like to change
directory at my terminal as well. How do I do that?
Thanks in advance.
Mei
------------------------------
Date: Tue, 16 Nov 1999 18:28:00 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Now it works...
Message-Id: <s338hg7uhsq80@corp.supernews.com>
Lab. - konto & (nproj-2@mdstud.chalmers.se) wrote:
: Sorry that I bothered you, I don't know why i didn't work last time.
Maybe you weren't plugged in?
--
| Craig Berry - cberry@cinenet.net
--*-- http://www.cinenet.net/users/cberry/home.html
| "They do not preach that their God will rouse them
a little before the nuts work loose." - Kipling
------------------------------
Date: 16 Nov 1999 17:08:21 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: openin file on client machine
Message-Id: <38318f85_1@newsread3.dircon.co.uk>
Mike Bickham <mbickham@photographics.co.uk> wrote:
> Jonathan Stowe <gellyfish@gellyfish.com> wrote in message
> news:38318068_1@newsread3.dircon.co.uk...
>> Mike Bickham <mbickham@photographics.co.uk> wrote:
>> > Hi All,
>> >
>> > I hope this is the right newsgroup for what I am about to ask.
>>
>> Lets see now ...
>>
>> > Is it possible to use a Perl-CGI script to create and open a file on a
>> > clients machine and place some binary data (in the form of a TIFF
> graphic
>> > file) into this file???
>> >
>>
>> Nope its not the right newsgroup.
>
> why isnt it the right group then?
>
because this is a question about the capabilities of browsers or about
HTTP and nothing to do with Perl ... You would be better off asking
this kind of question in comp.infosystems.www.authoring.cgi - of course
that wont change the answer .
/J\
--
"William Hague, the world's favourite hairline" - Rory Bremner
------------------------------
Date: Tue, 16 Nov 1999 10:21:48 -0800
From: Mike Judkins <mikej@1185design.com>
Subject: Perl 5.005 modules listing
Message-Id: <3831A0BC.3C13D10E@1185design.com>
Hey all,
Anyone know the URL to view all the Perl modules that come standard with
perl 5.00503? I dont want the listing of ALL the available modules, just
the ones that come with Perl and links to their homepages. Thanks!
mike
------------------------------
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 1396
**************************************
