[15996] in Perl-Users-Digest
Perl-Users Digest, Issue: 3408 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jun 18 03:05:41 2000
Date: Sun, 18 Jun 2000 00:05:28 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <961311928-v9-i3408@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sun, 18 Jun 2000 Volume: 9 Number: 3408
Today's topics:
Re: [ RexExp ] => /^[^(abc)]/ ? <TheEx0rcist@fanclub.org>
[Off Topic - Ignore Please] Re: hoe to know which modul <callgirl@la.znet.com>
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: [REGEXP] Matching list of comma-separated ID's <bochmann-usenet0600@gmx.net>
Re: A Computer Programmers Profile (brian d foy)
Re: Another Regular Expression Question <rootbeer@redcat.com>
Re: ANSI Perl: No Way !!! <godzilla@stomp.stomp.tokyo>
Anyone use ActivePerl on Win95 or Win98 <shawnball@uswest.net>
Re: Anyone use ActivePerl on Win95 or Win98 <rob13@rock13.com>
Re: Auto Gallery Maker <bob@bob-n.com>
Re: bug with arrays? <samay1NOsaSPAM@hotmail.com.invalid>
Re: bug with arrays? <alager@csuchico.edu>
Re: can't get CGI.pm to autoEscape ? <flavell@mail.cern.ch>
Re: cgi.pm if statements and redirect problems colincode@my-deja.com
Re: changing file permissions without telnet <rob13@rock13.com>
Re: Checking for open socket before writing to it? <godzilla@stomp.stomp.tokyo>
Re: Checking for open socket before writing to it? (brian d foy)
Re: Checking for open socket before writing to it? <godzilla@la.znet.com>
Re: Checking for open socket before writing to it? (brian d foy)
cmperl? <edwinNOedSPAM@mindless.com.invalid>
Content type !! <arun67@yahoo.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 14 Jun 2000 22:36:44 -0400
From: "TheEx0rcist" <TheEx0rcist@fanclub.org>
Subject: Re: [ RexExp ] => /^[^(abc)]/ ?
Message-Id: <642A954DD517D411B20C00508BCF23B001292EF9@mail.sauder.com>
THANKS EVERYONE FOR THE WISE SUFFESTIONS !!
You are all very bright, and I mean it!
------------------------------
Date: Sat, 17 Jun 2000 17:36:27 -0400
From: Kira <callgirl@la.znet.com>
Subject: [Off Topic - Ignore Please] Re: hoe to know which modules installed
Message-Id: <642A954DD517D411B20C00508BCF23B0012935FE@mail.sauder.com>
ChungpingLi wrote:
> Firends
> How to find out which modules installed in perl
> Please tell me
> Andrea
Others have graciously posted on how to do this.
You will enjoy how small our world can become,
when we pay attention to events and pay attention
to often overlooked minor details.
Seems bigfoot.com is a very popular remailer lately.
Are you satisfied with their service? I know of a
person who maintains lots of accounts with bigfoot
along with lots and lots of other servers. He seems
satisfied with this privacy afforded.
Anyhow, this sanfrancisco1.level3.net just happens to
be one of many personal servers of this person, someone
my friends and myself have known for a few years. What
a coincidence! He operates some class C servers in 'Frisco
with a peer news feed. Maybe you know him? This would explain
your posting through wt.net news server over in Texas.
Having lots of news servers available makes life a
lot easier, sure does.
However, more coincidental, my real name is Andrea
just like yours, Chung Ping Li.
That ain't all Andrea! Look at your path and look
at this!
10:22:53 5/15/2000 CHAT PROXY ATTEMPT:
- ISP: webcache.mathworks.com - DNS: 144.212.95.125
- System: mozilla/4.0 (compatible; msie 4.01; windows nt)
- X-Forwarded: 144.212.115.230
- Proxy Via: 1.1 webcache.mathworks.com:3128 (squid/2.2.stable2)
This person I know and mentioned, just happens to have a
lot of computers at his servers, one loaded with Win NT
and MSIE 4.01 !! Dang, so many million-to-one coincidences,
all wrapped up in one neat little article. I would have
fainted if you had posted via a MAC, his favorite system!
Very small world suddenly, yes Mr. Li? So very many
coincidental events in one article. I just couldn't
resist posting some trivia for you, even if mildly
off-topic, something I rarely do and avoid as a rule.
If you know Frank, tell him Kira says hello. He well
knows me.
I wish you luck on finding those modules and, I will
avoid off-topic posts such as this. However, this
is just too tempting with so many coincidences. Almost
like winning the California State Lottery.
Andrea better known as Kira
------------------------------
Date: Thu, 15 Jun 2000 06:22:51 -0400
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <642A954DD517D411B20C00508BCF23B001293409@mail.sauder.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 29 Apr 2000
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last _major_ update of the Perl FAQ was in Summer
of 1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://www.cpan.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
For an alternative way to get answers, check out the Perlfaq website.
http://www.perlfaq.com/
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://www.cpan.org/
http://www.perl.com/CPAN/
http://www.cpan.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 15 Jun 2000 06:22:51 -0400
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <642A954DD517D411B20C00508BCF23B00128FD2D@mail.sauder.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 29 Apr 2000
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last _major_ update of the Perl FAQ was in Summer
of 1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://www.cpan.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
For an alternative way to get answers, check out the Perlfaq website.
http://www.perlfaq.com/
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://www.cpan.org/
http://www.perl.com/CPAN/
http://www.cpan.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 16 Jun 2000 13:11:19 -0400
From: Henryk Bochmann <bochmann-usenet0600@gmx.net>
Subject: Re: [REGEXP] Matching list of comma-separated ID's
Message-Id: <642A954DD517D411B20C00508BCF23B001293340@mail.sauder.com>
Abigail <abigail@delanet.com> wrote:
> /^\d+\.\d\d(, \d+\.\d\d)* ?$/
> (use \z instead of $ if a trailing new line is not ok).
> You also might have to chance the * into a +, but I cannot figure out what
> you want. In your original message, you want to allow "1.03", but in
> your latter post, you say it shouldn't. Use * if "1.03" is ok, and + if
> it isn't.
Abigail,
thanks, this one works :) And, yes, I meant it to catch '1.03', too. My
mistake.
Regards,
Henryk
--
Henryk Bochmann, M.D. | bochmann@rcs.urz.tu-dresden.de
| University Clinic @ Technical University Dresden
Tel: +49 351 458-4813 | Institute of Clin.Chemistry & Laboratory Medicine
Fax: +49 351 458-4332 | 01307 Dresden, Fetscherstr. 74, Germany
------------------------------
Date: Wed, 14 Jun 2000 19:27:58 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: A Computer Programmers Profile
Message-Id: <642A954DD517D411B20C00508BCF23B001292DDF@mail.sauder.com>
In article <073055cc.658194f0@usw-ex0106-048.remarq.com>, Employer <jenniferbNOjeSPAM@oreilly.com.invalid> wrote:
>I am looking for this information in the interest to be able to find
>computer programmers for employment when I need them. They have been
>hard to find (the good ones anyway), and I am trying to find them!!
pay them well and they will come. seriously.
--
brian d foy
Perl Mongers <URI:http://www.perl.org>
CGI MetaFAQ
<URI:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
------------------------------
Date: Tue, 13 Jun 2000 16:21:30 -0400
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Another Regular Expression Question
Message-Id: <642A954DD517D411B20C00508BCF23B001292B6C@mail.sauder.com>
On Tue, 13 Jun 2000, Wonderland Enterprises wrote:
> Subject: Another Regular Expression Question
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> Is there a simple regular expression that would do the following?
>
> I want to replace any multiple appearance (more than three) of an
> individual character with three of that character.
Not a regular expression, but a substitution (s///). If you can't see how
to craft it after reading the docs, check back here - someone will have
posted it by then. :-)
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 13 Jun 2000 02:10:54 -0400
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: ANSI Perl: No Way !!!
Message-Id: <642A954DD517D411B20C00508BCF23B001291A70@mail.sauder.com>
Henry wrote:
>
> In article <3945944E.7DD4657A@stomp.stomp.tokyo>, "Godzilla!"
> <godzilla@stomp.stomp.tokyo> wrote:
(ASP point and snip in use)
> > when is comes to ASP language. This is power.
> It's also complete crap.
I rather think of ASP as mule manure.
> There are _huge_ technical and support aspects
> of running an ISP that can derive no benefit
> whatsoever from active server programming.
Yes. However you will have fun explaining this
to Mr. U. Ben Took who has a notion he can rent
a janitoral closet, buy a lot of tin cans and
string, then setup an ISP and make a goodly
three-million a year servicing Outhouse,
California, a city with a population of 1,382.
Shirley you have talked with a stereotypical
technical support person at an average ISP,
a pimple face teenager fresh off the hamburger
flipping line at Sir Reginald's. We have all
once been this teenager.
> Of course, if you're talking about a web-hosting
> company, that's a different story. But they are
> _not_ ISPs.
In time, competition and market trends will slim
down the gross number of web hosts. Eventually,
Bill Gates will buy all of them, with pocket change.
> I concur with your first sentence, however.
> PHP and kin (ssjs, asp, mod_perl...) pose an
> undeniable threat to standard Perl in its CGI role.
> I'd even go so far as to say that CGI as we know it
> could be on the endangered species list inside of
> 5 years, and gone the way of the dodo with a decade.
Quite possible. This is sad. When cgi goes to Fatal
Exception Error Heaven, so do all my programs along
with two of my favorite friends, my androids, Robby
and Roberta.
Hmm.. they may live on though via my home machine.
> > I admire Bill Gates. He is an American Hero.
> He's a one-eyed rat with remarkable self-preservation skills.
Missing some of his tail lately as well. Seems some
G-Men have been chewing his tail lately.
Henry, I have a plan to save Perl and, you are
just the man for the job. Think with imagination
on these thoughts, a way to reduce Perl core, reduce
memory bloat and speed up Perl along with giving it
a great marketing logo.
"Perl, programs itself and teaches you how to program."
Turn pragmas into modules.
Consider, worthless -w warnings. Ain't good for nothing
but annoying the heck out of you and confusing newbies
till they scream along with wasting a lot space in core.
Envision -w with DOS like switches:
-w /l (check lexical scoping)
-w /d (check dynamic scoping)
-w /my (check my usage of my)
-w /local (check my usage of local)
-w /anon (check my anon references)
Get the idea? Each pragma type could be turned
into a specific module with expanded functions,
including excellent Plain English documentation
opposed to current gibberish. Functions could
be expanded into some real serious extensive
and fast checking. Documentation could afford
paragraph length explanations with internal
links to expanded information and examples.
I am not talking about just warnings, but rather
all pragma hints and whatever else could be jerked
out of core and made into a series of specialized
modules with greatly expanded functions.
Impossible? Not at all and exceptionally logical.
What use are warnings when you have finished
writing your script and it functions perfect?
No use at all but, still resides in core.
Henry, care to guesstimate how much core could
be reduced if all pragmas, a good chunk of error
checking and whatever else, are removed from core?
If Perl 5 is to be Plug N Play, why not make it
a kick butt system? Can you imagine the benefit,
both in programming and marketing, if documentation
for Perl is kicked over into specialized modules
which could be healthy in size and, not effect
core at all.
What features!
"Listen Mr. U Ben Took, Perl is the programming
language for you. It offers an easy to follow
tutorial, has its own Install Wizard just like
Windows and yet, is better documented in Plain
English than any other language system. Let me
show you some great self-checking features which
are also great instructional aides featuring Plain
English and loads of examples..."
What about it Henry? Why don't you work on some
modules which would strip core to a bare minimum
and expand functionality for pragmas, syntax
checking, compile time...
While you are at it Henry, turn Perl into a pseudo
executable for install with point and click options.
Think, "Corvette Mako Shark, five-hundred-fifty horsepower."
Godzilla!
------------------------------
Date: Sat, 17 Jun 2000 13:10:18 -0400
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Anyone use ActivePerl on Win95 or Win98
Message-Id: <642A954DD517D411B20C00508BCF23B001293598@mail.sauder.com>
I downloaded ActivePerl. All the stuff was installed in the folder
C:\Perl\. When you work on a Unix system the heading would be
#!/usr/local/bin/perl but not on Windows. What am I supposed to replace it
with?
------------------------------
Date: Sun, 18 Jun 2000 00:23:56 -0400
From: "Rob - Rock13.com" <rob13@rock13.com>
Subject: Re: Anyone use ActivePerl on Win95 or Win98
Message-Id: <394C4EDC.6A32750F@rock13.com>
Ferk Da Jerk wrote:
>
> I downloaded ActivePerl. All the stuff was installed in the folder
> C:\Perl\. When you work on a Unix system the heading would be
> #!/usr/local/bin/perl but not on Windows. What am I supposed to replace it
> with?
I use c:\perl\bin\perl with Apache 1.3.12
--
Rob
http://rock13.com/webhelp/
Fight Spam - http://www.cauce.org/
------------------------------
Date: Sat, 17 Jun 2000 00:46:33 -0400
From: Bob Niederman <bob@bob-n.com>
Subject: Re: Auto Gallery Maker
Message-Id: <642A954DD517D411B20C00508BCF23B00129353B@mail.sauder.com>
Check out cthumbs, http://puchol.com/cpg/software/cthumb/
I look forward to the links, tho if your web-site has the same domian
name as your email, I suspect there won't be a lot of crossover.
--
- Bob Niederman http://bob-n.com
Fight UCITA! http://www.4cite.org, http://bob-n.com/ucita
Amber wrote:
>
> I am looking for a free, and I stress free perl script that will randomly
> create a thumbnail gallery from a directory of images. Each thumbnail Must
> link to it's full size image. I have found one script ($300.00) but I'm not
> in the position to be able to pay for such a program. If anyone can help,
> please email me. I'm willing to add links from ALL my pages to anyone that
> can help.
>
> Thanks
> webmaster@babesonthebeach.com
------------------------------
Date: Thu, 15 Jun 2000 18:19:04 -0400
From: Samay <samay1NOsaSPAM@hotmail.com.invalid>
Subject: Re: bug with arrays?
Message-Id: <642A954DD517D411B20C00508BCF23B0012930BB@mail.sauder.com>
We don't know what's in $record[$i], so cannot tell.. the
answer..
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Thu, 15 Jun 2000 18:36:01 -0400
From: Aaron <alager@csuchico.edu>
Subject: Re: bug with arrays?
Message-Id: <642A954DD517D411B20C00508BCF23B0012930CA@mail.sauder.com>
When we get to this point in the code $record[$i] is a date: mm-dd-yyyy
$record[$i]="10-8-1999"; #doesn't work
$record[$i]="11-8-1999"; #will work
any time the first number is 10, it fails.
Aaron
Samay wrote:
> We don't know what's in $record[$i], so cannot tell.. the
> answer..
>
> * Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
> The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Fri, 16 Jun 2000 17:45:04 -0400
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: can't get CGI.pm to autoEscape ?
Message-Id: <642A954DD517D411B20C00508BCF23B001293430@mail.sauder.com>
[apologies for the off-topic pontificating, but now the issue has
come up, I beg the group's indulgence to finish it off...]
On 16 Jun 2000, Neil Kandalgaonkar wrote:
> >> ?a=1&b=2
> >
> >In the HREF? That's exactly what it _should_ be.
>
> D'oh. After I posted the article I started wondering why HREFs should
> be specially immune to escaping after all. I should have checked
> the RFC's first.
It's a very widespread misunderstanding...
But ever since HTML2.0, there's been a recommendation to accept an
alternative delimiter (semicolon) in addition to the ampersand, in
order to side-step this oddity when simulating a form submission by
a hand-crafted URL. The recommendation is still there, in HTML4.0:
http://www.w3.org/TR/REC-html40/appendix/notes.html#h-B.2.2
and CGI.pm supports this convention too, although it used not
to generate that kind of URL by default (see the -newstyle_urls
Pragma).
-newstyle_urls became the default in a fairly recent version. I had
some email discussion with L.Stein about this a while back, as I had
the impression that the CGI.pm documentation and example for
self-referencing URLs was misleading. However, he pointed out (I'm
quoting loosely from memory) that the documentation had become OK as a
result of the adoption of -newstyle_urls (which in a practical sense
was true). Anyone who insisted on reverting to -oldstyle_urls would
have to look after themselves, however.
> I've encountered that problem of a browser recognizing an entity in
> an URL before, e.g.
>
> search.cgi?item=foo§=news
> ^^^^^
That indeed is the kind of risk I was discussing...
all the best
------------------------------
Date: Tue, 13 Jun 2000 03:14:36 -0400
From: colincode@my-deja.com
Subject: Re: cgi.pm if statements and redirect problems
Message-Id: <642A954DD517D411B20C00508BCF23B001291A94@mail.sauder.com>
No need to print header try this:
print "location:http://www.insuremybiz.com/confirmation.htm";
Colin Faulkingham
In article <39454B2C.E0CBDEB2@uptimeresources.net>,
Chris Sorensen <csorensen@uptimeresources.net> wrote:
> Thanks - I saw that but when I try to redirect without printing a
header .. it
> doesn't work ... I'm not sure why
>
> newsposter@cthulhu.demon.nl wrote:
>
> > Chris Sorensen <csorensen@uptimeresources.net> wrote:
> > > well .. the following script seems to work fine .. except for one
little
> > > thing ... when it tries to redirect it send the user to
> > > "http://www.insuremybiz.com/cgi-bin/confirmation.htm" rather than
> > > "http://www.insuremybiz.com/confirmation.htm"
> >
> > > any idea why ?
> >
> > If you get behaviour you don't understand, consult the
documentation,
> > it might give you some clues.
> >
> > perldoc CGI
> >
> > The redirect() function redirects the browser to a different
> > URL. If you use redirection like this, you should not print
> > out a header as well.
> >
> > Erik
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sun, 18 Jun 2000 00:26:47 -0400
From: "Rob - Rock13.com" <rob13@rock13.com>
Subject: Re: changing file permissions without telnet
Message-Id: <394C4F87.6933DC50@rock13.com>
primeooze wrote:
>
> anyone know a way?
WS_FTP might let you do this, it has the buttons but I'm not sure if
the server can block those commands or not.
--
Rob
http://rock13.com/webhelp/
Fight Spam - http://www.cauce.org/
------------------------------
Date: Sat, 17 Jun 2000 21:26:53 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Checking for open socket before writing to it?
Message-Id: <394C4F8D.BB951D6B@stomp.stomp.tokyo>
Ramesh Vadlapatla wrote:
> I am using this command to connect to a server:
> $socket1=IO::Socket::INET->new(PeerAddr=>"$hostname:$new_port",Proto=>"tcp");
> The server occasionaly shuts down, thereby closing the socket
> and my print command:
> $socket1->print($message);
> fails and I get a Broken Pipe message and the script just exits.
> How do I make sure that the server socket is
> open before I write to it?
Checking for an opened socket or checking for a
good connection, is very much like checking for
opening of file.
This is some of my old fashion stuff, which I love for
personal reasons, and shows a method to check for both
a socket and a remote connection, with success.
socket(S, $af_inet, $sock_stream, (getprotobyname('tcp'))[2])
|| &Error("Socket Connection Failed: $!");
connect(S, $remotehost)
|| &Error("Remote Connection To $host:$port Failed: $!");
As you can see, fairly much standard issue "or die" type
of logic. First code snippet, establishes, hopefully, a
local server socket or, creates an error message for me.
Second snippet, the same, a remote connection or die thing.
My hopes are these simple old fashion *big sigh* melancholy
examples will prompt you to ideas on writing your own
personalized 'or die' type of checking for your code.
Not so bad afterall, yes?
Checking for loss of a connection after making a connection,
this is a different can of worms. Make that connection and
write as fast you can. Wouldn't hurt to develop a method
of verifying your data made it to wherever, as expected.
Godzilla!
------------------------------
Date: Sun, 18 Jun 2000 01:05:25 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: Checking for open socket before writing to it?
Message-Id: <brian-ya02408000R1806000105250001@news.panix.com>
In article <394C4F8D.BB951D6B@stomp.stomp.tokyo>, "Godzilla!" <godzilla@stomp.stomp.tokyo> posted:
> Ramesh Vadlapatla wrote:
>
> > I am using this command to connect to a server:
>
> > $socket1=IO::Socket::INET->new(PeerAddr=>"$hostname:$new_port",Proto=>"tcp");
>
> > The server occasionaly shuts down, thereby closing the socket
> > and my print command:
>
> > $socket1->print($message);
>
> > fails and I get a Broken Pipe message and the script just exits.
>
> > How do I make sure that the server socket is
> > open before I write to it?
>
>
> Checking for an opened socket or checking for a
> good connection, is very much like checking for
> opening of file.
... save that a socket might shut down after it has been opened
successfully, which is why the OP is asking the question, and
how you missed answering it.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Mongers <URL:http://www.perl.org/>
------------------------------
Date: Sat, 17 Jun 2000 22:17:56 -0700
From: "Godzilla!" <godzilla@la.znet.com>
Subject: Re: Checking for open socket before writing to it?
Message-Id: <394C5B84.BBC5C1D5@la.znet.com>
brian d foy wrote:
> "Godzilla!" <godzilla@stomp.stomp.tokyo> posted:
> > Ramesh Vadlapatla wrote:
> > Checking for an opened socket or checking for a
> > good connection, is very much like checking for
> > opening of file.
> ... save that a socket might shut down after it has been opened
> successfully, which is why the OP is asking the question, and
> how you missed answering it.
Education today, just ain't producing effective
readers as with my generation. Sigh... this is
such a disgrace, so many functional illiterates.
Original question:
"How do I make sure that the server socket
is open before I write to it?"
Maybe an English teacher like myself could
assist you in understanding this question,
Mr. D. Boy.
Godzilla!
------------------------------
Date: Sun, 18 Jun 2000 02:15:03 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: Checking for open socket before writing to it?
Message-Id: <brian-ya02408000R1806000215030001@news.panix.com>
In article <394C5B84.BBC5C1D5@la.znet.com>, "Godzilla!" <callgirl@la.znet.com> posted:
> brian d foy wrote:
> > "Godzilla!" <callgirl@la.znet.com> posted:
> > > Ramesh Vadlapatla wrote:
>
> > > Checking for an opened socket or checking for a
> > > good connection, is very much like checking for
> > > opening of file.
>
> > ... save that a socket might shut down after it has been opened
> > successfully, which is why the OP is asking the question, and
> > how you missed answering it.
> Original question:
> "How do I make sure that the server socket
> is open before I write to it?"
that's correct. however, you only answered the question about
checking to see if you *opened* a socket. it still might close
later from the remote side for a variety of reasons. the OP
wants to be able to handle this condition. see the other
answer given which actually answers the question.
the first step to effective answers is recognizing the question.
you aren't that far along yet.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Mongers <URL:http://www.perl.org/>
------------------------------
Date: Tue, 13 Jun 2000 02:24:04 -0400
From: Edwinek <edwinNOedSPAM@mindless.com.invalid>
Subject: cmperl?
Message-Id: <642A954DD517D411B20C00508BCF23B001291A82@mail.sauder.com>
Hi,
From a friend I got the URL
http://www.petes-place.com/cmperl.html, which is about how
Microsoft supposedly hijacked ActiveState Perl and which should
include a new, MS-free distribution. But sadly, the site seems to
be down now and has been for at least a week. Does anyone know
anything about this? Pete, are you reading this? What happened to
your site?
Edwin
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Sat, 17 Jun 2000 09:30:07 -0400
From: Arun Mahajan <arun67@yahoo.com>
Subject: Content type !!
Message-Id: <642A954DD517D411B20C00508BCF23B00129359B@mail.sauder.com>
Hi Everybody,
Is there anybody who could tell me why i am getting this output.
code:-
------
print "Content-type: text/html\n\n";
print "Hello World\n";
output:-
-------
Content-type: text/html
Hello World
does it mean I can not specify my content type.
Moreover is it possible to make a program to get back all content type. can
you provide a sample code.
thanks and regards,
Arun
--
Posted via CNET Help.com
http://www.help.com/
------------------------------
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 3408
**************************************
