[7156] in Perl-Users-Digest
Perl-Users Digest, Issue: 781 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jul 26 10:17:19 1997
Date: Sat, 26 Jul 97 07:00:39 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 26 Jul 1997 Volume: 8 Number: 781
Today's topics:
Date::Manip Error (J. Paul Reed)
Re: Delete a file (Nathan V. Patwardhan)
FIX: Perl, BIND, LWP, and being unable to resove '__ine <chris@ixlabs.com>
FIX: Perl, BIND, LWP, and being unable to resove '__ine <chris@ixlabs.com>
Re: Help with Perl-Win32 and Windows 95 <keys@babylon5fan.org>
Re: if (defined( subroutine) )? <ceklof@vt.edu>
Re: Is Perl 5.004 avaliable for Win NT 4 ? (Marc Haber)
Net::FTP documentation and examples <keys@babylon5fan.org>
Re: Newbie Post! Heads up! (file question) (Tad McClellan)
Re: Newbie: Needs to know how to get script to read rem <buck@huron.net>
Re: Perl Editor for Win32? <keys@babylon5fan.org>
REQ: Answer to perl on Win95 newbie question <rabit@netlabs.net>
Shebang appendage pittelli@envmed.rochester.edu
Re: Sorting <tibbs@hpc.uh.edu>
Re: Syslog -- help please (Anthony J. Breeds-Taurima)
Re: Too many people in this group are arrogant #*(@# (R (Chris Russo)
Re: Too many people in this group are arrogant #*(@# (R <rmelson.nospam@primenet.com>
Re: Too many people in this group are arrogant #*(@# (R (Kevin Connery)
Re: Too many people in this group are arrogant #*(@# (R (Abigail)
Re: Too many people in this group are arrogant #*(@# (R (Bart Lateur)
Re: Too many people in this group are arrogant #*(@# (R (Billy Chambless)
Re: Uploading a file without using Net::FTP (Matthew Burnham)
Using graphics in Secure area (Peter Wilkins)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 26 Jul 1997 12:46:11 GMT
From: preed@psd.k12.co.us (J. Paul Reed)
Subject: Date::Manip Error
Message-Id: <5rcrij$2aa$1@mercury.psd.k12.co.us>
I installed the Date::Manip module, and put use Manip in my perl code.
But, now whenever I run whatever script I put that use Manip in, it says:
Can't call method "import" in empty package "DateManip" at script.pl line 56.
BEGIN failed--compilation aborted at script.pl line 56.
I just installed it, and did move Manip.pm around to another directory,
plus renamed it do DateManip.pm. Other than that, the install went fine;
no error messages (other than I had to install it as root after I got done
cofiguring it, which I did).
Any help on what this means would be appreciated!
Thanks!
Later,
Paul
-------------------------------------------------------------------
J. Paul Reed preed@psd.k12.co.us || paul@619pro.com
Such a noble creature; a quality we sometimes lack...
--Borg Queen; Star Trek: First Contact
Geek Code and various other frivolities at www.psd.k12.co.us/~preed
------------------------------
Date: 26 Jul 1997 05:37:11 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Delete a file
Message-Id: <5rc2e7$2f4@fridge-nf0.shore.net>
Simon Fairey (sfairey@adc.metrica.co.uk) wrote:
: There is no need to delete the file if it contains data as it will be
: recreated when you open it.
[snip]
The code above should use flock() to avoid potential problems. Hope
this helps!
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Fri, 25 Jul 1997 20:34:23 -0700
From: Chris Schoenfeld <chris@ixlabs.com>
Subject: FIX: Perl, BIND, LWP, and being unable to resove '__inet_ntoa'
Message-Id: <33D9703F.19CE@ixlabs.com>
Recently, I built perl5.004 on a Linux box with a newer version of BIND.
Later, I attempted to install libwwwperl5.10 into this new Perl, but
failed on the make test with an error:
unable to resolve symbol '__inet_ntoa'
After weeks of misery, Michael Fuhr (mfuhr@dimensional.com) pointed out
that BIND 8.1 now places it's include files in /usr/local/bind/include,
rather than /usr/local/include, which is where Perl is going to find
them if you upgraded from a previous version of BIND.
So, on our system, the fix was to rm -rf the BIND files from
/usr/local/include, which includes the following files and directories:
/arpa
/isc
/net
/sys
netdb.h
resolv.h
Now you have to reinstall Perl, editing the makefile so that all (I
found 2) references to /usr/local/include/netdb.h are changed to
/usr/local/bin/include/netdb.h.
Now reinstall libwwwwperl-5.10 (or whatever other module is failing with
BIND).
Should 'make test' fine.
Thanks again to Mark Fuhr for his help...hopefully this fix will provide
some pointers for others having trouble with Perl modules or other C
programs which use BIND.
--
Chris Schoenfeld
Director, Advanced Technology
IX Development Laboratories
(707)-453-8030 Ext. 12
------------------------------
Date: Fri, 25 Jul 1997 20:34:40 -0700
From: Chris Schoenfeld <chris@ixlabs.com>
Subject: FIX: Perl, BIND, LWP, and being unable to resove '__inet_ntoa'
Message-Id: <33D97050.2624@ixlabs.com>
Recently, I built perl5.004 on a Linux box with a newer version of BIND.
Later, I attempted to install libwwwperl5.10 into this new Perl, but
failed on the make test with an error:
unable to resolve symbol '__inet_ntoa'
After weeks of misery, Michael Fuhr (mfuhr@dimensional.com) pointed out
that BIND 8.1 now places it's include files in /usr/local/bind/include,
rather than /usr/local/include, which is where Perl is going to find
them if you upgraded from a previous version of BIND.
So, on our system, the fix was to rm -rf the BIND files from
/usr/local/include, which includes the following files and directories:
/arpa
/isc
/net
/sys
netdb.h
resolv.h
Now you have to reinstall Perl, editing the makefile so that all (I
found 2) references to /usr/local/include/netdb.h are changed to
/usr/local/bin/include/netdb.h.
Now reinstall libwwwwperl-5.10 (or whatever other module is failing with
BIND).
Should 'make test' fine.
Thanks again to Mark Fuhr for his help...hopefully this fix will provide
some pointers for others having trouble with Perl modules or other C
programs which use BIND.
--
Chris Schoenfeld
Director, Advanced Technology
IX Development Laboratories
(707)-543-8030 Ext. 12
------------------------------
Date: Fri, 25 Jul 1997 22:58:29 -0600
From: Keys <keys@babylon5fan.org>
Subject: Re: Help with Perl-Win32 and Windows 95
Message-Id: <33D983F5.D1097513@babylon5fan.org>
Antsnio M. Rezende wrote:
>
> machine. The problem is that the scripts will not run. They
> either display the contents of the script file or just open a
> Window and display something to it (It's too fast even for me
> to try to grab the window so I cant explain what scrolls in
> it).
>
> Has anyone set Perl-Win32 to run with Windows 95? If so can you
> please share it?
If you have your perl.exe associated with your perl scripts, then
normally the window will disappear immediately after dumping the
output. What I prefer (and what is suggested) is that you put your
perl\bin directory in your path, then go to a DOS window and do 'perl
scriptname.pl' and then the box will remain open and you will be able to
see [some of] the output. Also, for CGIs, you might look for
OmniHTTPd... it's small and supports perl pretty well... and it runs
on 95.
--
Keys
Spam sucks. To reply, please change "org" to "com" in my return
address...
For my PGP key, mail me with "send PGP key" in the subject...
------------------------------
Date: Wed, 23 Jul 1997 10:44:46 -0700
From: Carl Eklof <ceklof@vt.edu>
To: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: if (defined( subroutine) )?
Message-Id: <33D6430E.649B@vt.edu>
Hhmmmm,
Anyone know how I can check for a defined routine in a package (object)?
Am I pressing my luck here? I've tried:
print "It's defined!\n" if defined(&$package->subroutine);
print "It's defined!\n" if defined(&package->subroutine);
print "It's defined!\n" if defined(&($package->subroutine));
print "It's defined!\n" if defined($package->&subroutine);
They all seem to be either saying that it is defined when it is not, or
just crashing. Yes, I am a newbie to perl.
Thanks in advance,
-Carl
P.S. Thanks Tom, at least I am one step closer.
Tom Phoenix wrote:
>
> On Tue, 22 Jul 1997, Carl Eklof wrote:
>
> > Subject: if (defined( subroutine) )?
> >
> > Does anyone know of a way of detecting if a subroutine is defined?
>
> print "It's defined!\n" if defined(&subroutine);
>
> You were so close! :-)
>
> --
> Tom Phoenix http://www.teleport.com/~rootbeer/
> rootbeer@teleport.com PGP Skribu al mi per Esperanto!
> Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Sat, 26 Jul 1997 10:45:56 GMT
From: s_haber@ira.uka.de (Marc Haber)
Subject: Re: Is Perl 5.004 avaliable for Win NT 4 ?
Message-Id: <5rckgs$gcl$1@nz12.rz.uni-karlsruhe.de>
abigail@fnx.com (Abigail) wrote:
> Perl runs on
> Windows 95 as well, but it cannot be built there, for lack
> of a reasonable command interpreter.
Anybody tried to build perl with 4DOS as a command interpreter, which
I consider a very reasonable one?
Greetings
Marc
--
-------------------------------------- !! No courtesy copies, please !! -----
Marc Haber | " Questions are the | s_haber@ira.uka.de
Karlsruhe, Germany | Beginning of Wisdom " | Fon: *49 721 966 32 15
Nordisch by Nature | Lt. Worf, TNG "Rightful Heir" | Fax: *49 721 966 31 29
------------------------------
Date: Fri, 25 Jul 1997 22:40:40 -0600
From: Keys <keys@babylon5fan.org>
Subject: Net::FTP documentation and examples
Message-Id: <33D97FC8.4C0B95FF@babylon5fan.org>
Does anyone know of a more detailed set of documentation for Net::FTP?
I have been working with the example as given in the perldoc page, but
it doesn't seem to work for me... no errors or anything... I haven't
been able to get anything on CPAN for the last week or so either, as it
appears that perl.com is having server problems...
--
Keys
Spam sucks. To reply, please change "org" to "com" in my return
address...
For my PGP key, mail me with "send PGP key" in the subject...
------------------------------
Date: Fri, 25 Jul 1997 07:04:27 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Newbie Post! Heads up! (file question)
Message-Id: <bo4ar5.2o.ln@localhost>
[ emailed, posted]
jamie (jamie@comet.net) wrote:
: Ok, pardon the shroud of ignorance here and/or if this is a Frequently
: Questioned Answer.....
: when I (or you or we) say:
: open(SOMEFILE,">disfile") || die "no can do"
: open(TINCAN,"tincan") || die "tincan won't open"
: are the files (disfile and tincan) always assumed by perl to be in the
: directory that the script is in?
No.
: I'd think the answer is yes, unless
: specified otherwise (as in /etc/passwd, /etc/aliases or by some variable).
: Is there ever a case when it's otherwise?
Yes. All cases ;-)
: Or am I fulla worms here? I'm
: fairly new to perl, so again pardon my SOI.
It assumes that the are in the current directory, regardless of where
the Perl script is.
: Emailed answer would be much appreciated, as our news server expires like
: every 14 minutes or something...
OK.
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Sat, 26 Jul 1997 09:38:35 -0400
From: Stephen Hill <buck@huron.net>
Subject: Re: Newbie: Needs to know how to get script to read remote web page
Message-Id: <33D9FDD5.72546086@huron.net>
> I'm currently writing a script that basically gets a log file (pretty
> much straight text, no HTML formatting) which is accessible via WWW
> for
> internal processing. I've been scouring the net for something that
> does
> something along that lines, but I'm either blind or too new at this to
>
> recognize what I need to find. Can anyone point me in the right
> direction?
I think this is what you are looking for.
$url = "www.thepage.i.want.com";
$html_code = `lynx -source $url`;
$text_data = `lynx -dump $url`;
$html_code provides the html coding and $text_data contains the output
(what you would see in your browser)
You will have to have a lynx browser on your system for this to work.
BTW.....this info is in the FAQ, I would give you the URL for it but I
forget it, I have it on my sys for quick reference.
------------------------------
Date: Fri, 25 Jul 1997 22:35:05 -0600
From: Keys <keys@babylon5fan.org>
Subject: Re: Perl Editor for Win32?
Message-Id: <33D97E79.D15DD475@babylon5fan.org>
I personally was impressed with JED... It runs on most platforms (UNix,
DOS, Win3.x, Win95, etc), has syntax highlighting for many popular
languages, and is smart enough to not use wordwrap when you name your
scripts properly...
You can get it via ftp from space.mit.edu in /pub/davis/jed directory...
--
Keys
Spam sucks. To reply, please change "org" to "com" in my return
address...
For my PGP key, mail me with "send PGP key" in the subject...
------------------------------
Date: 26 Jul 1997 10:15:13 GMT
From: "Bob" <rabit@netlabs.net>
Subject: REQ: Answer to perl on Win95 newbie question
Message-Id: <01bc99a4$6f265280$36ac22ce@netlabs.net.netlabs.net>
1. Running Perl on Win95 with O'Reilly Website -
Simple Perl progs and forms work as expected. The configuration appears
alright, but when I call custom libraries like cgi-lib, I get a server
error 400.
I put the libraries in my c:\perl\ dir and use INC at /usr/bin/perl/custom
to show path. Any wisdom on why I can't get the libraries to run?
2. Running progs with a .cgi extension -
Do I put these in a .bat file with: @echo on, perl xxx.cgi
or do I just rename these to .pl?
Is this a sorry pursuit that won't work at all, in which case I'm stuck
with Visual Basic?
Thanks for any help,
Bob
------------------------------
Date: Fri, 25 Jul 1997 22:36:30 -0600
From: pittelli@envmed.rochester.edu
Subject: Shebang appendage
Message-Id: <869887450.32677@dejanews.com>
When first learning Perl (4.036), I found a script that had a shebang in
it, and I copied it for all my scripts. But it has an extra bit of code
attached to the end of it. On at least one Unix box (forgot which one,
so now I'm superstitious over its significance), my scripts crash without
the appendage, while on more than one, my scripts crash WITH it.
The line looks like this:
#!/usr/bin/perl -- -*-perl-*-
...so my question is, what in the name of *#&$^# is that `-- -*-perl-*-`
for? And would you think that the build that choked without it was most
likely crashing on some OTHER code of mine (as a result of my nonlinear
debugging techniques :)???
Please cc: pittelli@envmed.rochester.edu
Much appreciated!
-Randy
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: 25 Jul 1997 23:09:10 -0500
From: Jason L Tibbitts III <tibbs@hpc.uh.edu>
Subject: Re: Sorting
Message-Id: <ufaen8m4fq1.fsf@sina.hpc.uh.edu>
>>>>> "RA" == Russ Allbery <rra@stanford.edu> writes:
RA> If you have a huge text file you want to sort, you want to use the
RA> standard Unix command "sort".
Unfortunately you can't supply an arbitrary perl subroutine to the sort
command as an item comparator. I suppose you could write out an
intermediate text file with each line prefixed by some munged data that
makes the sort command act the way you want it, but that seems more painful
than necessary. In my application I need to sort by a piece of a line
reversed and I need to be able to deal with arbitrarily sized files
(hundreds of thousands of lines).
My solution now is to just put it all in a DB_File in BTree mode with a
supplied comparison function, since I have a key-value structure that I can
exploit. DB_File is cool.
--
Jason L. Tibbitts III - tibbs@uh.edu - 713/743-3486 - 622PGH
System Manager: University of Houston Department of Mathematics
1994 PC800 "Kuroneko" DoD# 1723
------------------------------
Date: 26 Jul 1997 06:30:52 GMT
From: tony@poseidon.canningcollege.wa.edu.au (Anthony J. Breeds-Taurima)
Subject: Re: Syslog -- help please
Message-Id: <869941571.217456@proteus.cantech.net.au>
Aaron Sherman (ajs@lorien.ajs.com) wrote:
: Your problem is not with perl, but with your system
: configuration. Look at /etc/syslog.conf or the equiv. on your system,
: and see if you have routed *.info anywhere.
I have to admit I did think it was a problem with my system. I checked
/etc/syslog.conf and *.info is routed to /usr/adm/messages (this is the file
i've been looking in)
--
Yours Tony.
------------------------------
Date: Fri, 25 Jul 1997 13:30:28 -0700
From: crusso@alink.net (Chris Russo)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <crusso-2507971330280001@buzz.alink.net>
[mailed and posted]
In article <EDuInp.6GL@world.std.com>, aml@world.std.com (Andrew M.
Langmead) wrote:
>"John Bokma" <jbokma@caiw.nl> writes:
>
>>Subject: Re: Too many people in this group are arrogant #*(@# (Re:
>> Checking for valid Email...)
The response to this was excellently said, so it bears quoting:
> [...] when someone asks a question, and is told that they
>have already been provided with the answer, they should be
>embarrassed, not upset.
I couldn't agree more.
>>If that's the only thing you want to share
>>with this group, please don't. There is enough noise already. Stupid
>>questions don't
>>need stupid answers, just don't answer them
No, because then newcomers to the list create lots of their own noise and
wrong answers just trying to be helpful.
I much prefer the method by which the regulars of cslpm set the tone in
this newsgroup. Telling a user "Read the FAQ" after the first lame
question tends to forestall the next 10 lame questions from the same
person and a dozen others by people reading along.
I, for one, very much appreciate the high-content level of this newsgroup.
Regards,
Chris Russo
----------------------------------------------------------------------
Chris Russo A-Link Network Services, Inc.
crusso@alink.net Bolo me
http://www.alink.net/~crusso
------------------------------
Date: 25 Jul 1997 21:49:01 -0700
From: Robert Melson <rmelson.nospam@primenet.com>
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <33D98102.167EB0E7@primenet.com>
John Bokma wrote:
>
> Andrew M. Langmead <aml@world.std.com> wrote in article
> <EDuInp.6GL@world.std.com>...
> > "John Bokma" <jbokma@caiw.nl> writes:
> >
> > >Subject: Re: Too many people in this group are arrogant #*(@# (Re:
> > > Checking for valid Email...)
> >
> > Let me just suggest another way of looking at this issue.
> >
> > A FAQ document is supposed to contain concise, factual, entries
> taking
> > care of questions about its subject. If I had a question, I would
> much
> > rather someone point out an entry in the FAQ instead of having
> someone
> > post an answer.
>
> Some questions are that simple, that the answer and a pointer to the
> FAQ can
> be at one line.
>
> [ snip ]
>
> > Being able to give an authoritative answer like "the FAQ says..."
> > stops an awful lot of wrong answers from being posted.
>
> Some postings use the FAQ like some holy bible, and don't leave any
> room
> for thinking together about a solution. The FAQ *can* be wrong, or
> maybe
> incomplete (I don't say it is!).
>
> > Yes, a lot of
> > questions from the FAQ and man pages are being asked nowadays. Its
> a
> > shame the posters didn't do a fair amount of their own work first.
> I'd
> > rather read one post that says "the FAQ says ..." than a half dozen
> > wrong answers.
>
> Wrong answers can lead to different or even better solutions. The
> process
> is sometimes called brain storming... I don't think it is needed on
> really simple
> questions like: how do I remove leading/trailing spaces.
>
> > >Too many people (even some famous ones, yes you know that I mean
> > >you!) reply
> > >on too many posting with "Read the FAQ", DejaNews.
> >
> > The way I think about things, I would much rather have someone
> point
> > out to me a specific, verifiable reference, over someone giving an
> > answer of the top of their head.
>
> I never answer Perl questions out of the top of my head (unless it is
> a really simple one..). If my answer is a script I try it before
> posting it.
> If my answer is not a script, I search the Programming Perl (new
> and/or
> old one) and think about the reply in the book, before posting (the
> book can
> be wrong 8-), and I want to know what I post...)
>
> > As an example. The other day, I was asking a mechanical engineer
> how
> > much space there was between the paper sensor and the rubber roller
> on
> > a part he designed. I didn't need an exact measurement, just a
> rough
> > idea how much further i needed to eject the paper after the sensor
> to
> > make sure the paper was grabbed by the pinch roller. He could have
> > eyeballed it and gave me a guess, but instead he reminded me about
> the
> > disk of mechanical drawings he sent.
>
> But he probably didn't answer you "See the DISC".
>
> > Two lessons. First, an exact reference is much better than an
> imformed
> > opinion.
>
> How about both?
>
> > Second, when someone asks a question, and is told that they
> > have already been provided with the answer, they should be
> > embarrassed, not upset.
>
> Some newbies don't know about things like a FAQ or where to find the
> answer.
> Too many people are forgotten that they started as newbies too! Only
> now, there
> are much more newbies!
>
> >
> > >Or what I really hate, when someone asks "How can I do this
> without
> > >using the
> > >... lib/module?" that the answers is: "Why not? It worked for me.
> > >Instead of
> > >answering the original question.
> >
> > The only case I can think of where I have seen someone ask "how can
> I
> > do this without using {fill in library, module or base language
> > feature here.} is in relation to perl 4. I'm not saying that
> everyone
> > should be forced to upgrade to the latest version of every piece of
> > software, but think about it. Perl 5 was written to correct many
> > problem inherent in perl 4. If perl 4 lacks the ability to do
> > something conveniently, it was very likely corrected in perl 5.
> >
> > Most of the rest of the answers that say "use the xxx module
> available
> > at <URL:http://www.perl.com/CPAN/>" are responses to questions
> where
> > people just said "how do I do xxx". Its not that they needed a
> > non-module solution, they were just lucky enough to get one.
> >
> > If someone as a certain reason for not using a particular libarary,
> > module or language feature, they can say so. Most people here
> probably
> > do enough tinkering so that evan a "I just know how a xxx would
> work"
> > is a good enough reason.
> >
> > Hey, tell you what. Find me a post where someone asks "How can I do
> > this without using the ... lib/module?"
>
> Use DejaNews, (Sockets). I can remember a few postings about Sockets,
> answered
> with the "holy" answer: "And thou should only use the LPW module!"
>
> >
> > >If that's the only thing you want to share
> > >with this group, please don't. There is enough noise already.
> Stupid
> > >questions don't
> > >need stupid answers, just don't answer them
> >
> > Then you have the group of people who then post "no one answers my
> > questions here." flames.
>
> And if you don't reply these too, they stop 8-).
>
> >
> > You can't win either way.
>
> I think that you win much more by being nice, instead of arrogant.
> I.e. post
> both a reply and a pointer, not only the mantra "See the FAQ".
>
> Please be sure the reply by !Ook too. He is much better in expressing
> this than I am
> (But hey, English is not my native language 8-).
>
> > -
-
> > Andrew Langmead
> >
>
> John
>
> --
> ----------------------------------------------------------------------
>
> Need a Freelance Software Developer (MSc)? (CGI, Perl, Java, C, C++)
>
> http://www.caiw.nl/~jbokma [Java demo's, Curriculum Vitae and
> more...]
>
> email: jbokma@caiw.nl phone: +31 10 4291827
--
.lurk off
It's an attitude like the original poster's that has driven people like
Larry and Tom C. away from the news group. AT first, when I read Tom's
parting sally, I thought he was being something of a s..thead. AS the
weeks and months have progressed, however, I find myself sympathizing
with his attitude.
I have little sympathy for folks who don't bother to do any basic
research for themselves, particularly when the perl distribution is so
well documented *and* there are so many good books on the language
available. If, after having exhausted the resources available AND
having rubbed the couple of brain cells - possibly atrophied through
disuse - in his possession together the original poster had posted
courteously and with the understanding that the people who *do* answer
the requests for help posted here are doing it on their own time and out
of their enthusiasm for the language, I might be able to accept his
rantings. As it is, I think he'll find the well has dried up and that
he'll get scant attention here in the future. For myself, my reply to
him is just this - put a sock in it and come back when you've grown up.
.lurk on
----------------------------------------------------------------------------
Bob Melson The right to be heard does not include
Rio Grande Microsolutions the right to be taken seriously
El Paso, TX rmelson@primenet.com Hubert Humphrey
----------------------------------------------------------------------------
------------------------------
Date: 26 Jul 1997 04:59:24 GMT
From: Keradwc@cris.com (Kevin Connery)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <5rc07c$imb@chronicle.concentric.net>
In article <Ook!-ya02408000R2407971404070001@snews.zippo.com>,
Ook! <annoying@super.zippo.com> wrote:
>2) How in the hell are better modules going to get wriiten if the same old
>stuff keeps getting reused? Insanely Great stuff rarely comes out of the
>30th revision by the same author.
Perl5.
How many revisions? "same old stuff...getting reused?"
Are you saying it's _not_ insanely great? In _this_ newsgroup?
--kdc
------------------------------
Date: Sat, 26 Jul 1997 08:12:04 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <EDx2s4.93y@nonexistent.com>
Mike Stok (mike@stok.co.uk) wrote on 1425 September 1993 in
<URL: news:5rbiqh$o8d@news-central.tiac.net>:
++ In article <33D8FF76.361C@deltanet.com>,
++ Brad Hughes <X-ebh@deltanet.com> wrote:
++
++ >Perhaps the more appropriate analogy has to do with giving a
++ >hungry man a fish versus teaching him _how_ to fish.
++
++ As long as he learns to fish before he starves :-) Where's the harm in
++ giving him a fish and offering him pointers on learning too?
A lot if the best fishermen leave. That leaves the man with
rotten fish, and a lousy technique.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=new Math::BigInt+qq;$^F$^W783$[$%9889$^F47$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W98$^F76777$=56;;$^U=$]*(q.25..($^W=@^V))=>do{print+chr$^V%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: Sat, 26 Jul 1997 14:00:57 GMT
From: bart.mediamind@tornado.be (Bart Lateur)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <33da014b.2257142@news.tornado.be>
crusso@alink.net (Chris Russo) wrote:
>I, for one, very much appreciate the high-content level of this newsgroup.
????
I love Perl, but I do not like this newsgroup.
When retrieving new headers, I automatically download all postings by
Randal. I like his style. I hardly even bother to look at the rest of
the postings.
So it IS possible to be a Perl guru without being a prick.
Bart.
------------------------------
Date: 26 Jul 1997 13:34:46 GMT
From: billy@cast.msstate.edu (Billy Chambless)
Subject: Re: Too many people in this group are arrogant #*(@# (Re: Checking for valid Email...)
Message-Id: <5rcudm$ln9$1@NNTP.MsState.Edu>
In article <5rc07c$imb@chronicle.concentric.net>, Keradwc@cris.com (Kevin Connery) writes:
|> In article <Ook!-ya02408000R2407971404070001@snews.zippo.com>,
|> Ook! <annoying@super.zippo.com> wrote:
|> >2) How in the hell are better modules going to get wriiten if the same old
|> >stuff keeps getting reused? Insanely Great stuff rarely comes out of the
|> >30th revision by the same author.
|> Perl5.
I'll see your Perl 5 and raise you a CGI.pm. Read the revisions list at
the end of the CGI.pm docs to get an idea of how Insanely Great software
gets that way.
It's called an "evolutionary software lifecycle" in sofware engineering
circles. ;)
|> How many revisions? "same old stuff...getting reused?"
*snicker*
As opposed to what? Reinventing the wheel?
--
* "We all agree on the necessity of compromise. We just can't agree on
* when it's necessary to compromise."
* --Larry Wall in <1991Nov13.194420.28091@netlabs.com>
------------------------------
Date: Sat, 26 Jul 1997 09:46:54 GMT
From: danew@enterprise.net (Matthew Burnham)
Subject: Re: Uploading a file without using Net::FTP
Message-Id: <33defb8e.9728481@194.72.192.4>
Euan Forrester <deforres@acs.ucalgary.ca> wrote:
>Also, I can't find a way to send the file's size to
>the user's browser so that they will know how long the download will take
>(the files can get large)
Try sending a Content-Length: header as well as Content-Type:
--
Matthew Burnham, Manager, MindWeb | danew@enterprise.net
Commercial web design and hosting, reasonable rates
UKP24/Mb/Year for DIY space | mindweb@pobox.co.uk
FTP, CGI, password protection, etc. too!
http://www.mindweb.co.uk/
------------------------------
Date: 26 Jul 1997 10:18:43 GMT
From: wilmap@ozemail.com.au (Peter Wilkins)
Subject: Using graphics in Secure area
Message-Id: <wilmap-2607971950260001@sladl5p18.ozemail.com.au>
I have just become interested in perl and have a script which secures
party of my site at
"http://www.ozemail.com.au/~askwendy.
the site is now secure but the graphics are not printing on the cgi's made
from my working html when I locked down.
I ran spiderman, then lockdown, and all works fine.
Could somebody help me before I go crazy trying to figure it out.
above the html paste area, it says
sub getpassword {
# Print html page requesting "password"
print <<ENDPAGE;
content-type: text/html \n\n
$cookie
<html>
<head><title>THIS AREA IS SECURED!</title></head>
<body><body bgcolor=ffffff>
Enter the code word from your e-mail message to enter:<br>
<hr>
<form method=post action=$accountlookup>
<input name=userpassword size=10><br>
<input type=submit value="ENTER PASSWORD"><br>
</form>
</body>
</html>
ENDPAGE
}
############################################################
sub showpage {
open (CARDS, "$passwdfile");
@cards=<CARDS>;
$found=0;
$cookie="$ENV{'HTTP_COOKIE'}";
$userpassword=$FORM{'userpassword'};
($trash,$validpass)=split(/\|/,$cookie);
foreach $card (@cards) {
($pass,$from,$date,$membership,$type,$status,$expire)=split(/\|/,$card);
if ($pass eq $validpass) {
$found=1;
last; }
}
############################################################
############################################################
# PASTE HTML BELOW content-type: html\n\n!!!!
############################################################
############################################################
if ($found) {
print <<INSERTHTML;
content-type: text/html\n\n
<HTML>
<BODY BACKGROUND= "Pix/AskWendy2.GIF">
etc.etc.etc. to <<ENDPAGE
AM I ON THE WRONG TRACK.
Is it not possible to display graphics in a secure area even though I have
given them 777 permissions.
I do not have Virtual Server access so I only have access to a cgi-bin set
up on my server.
I cant get out of the secured folder to "http:// to the image files. (Not
that I want to any way !.
Thanks in advance.
Peter Wilkins.
Wilkins Tourist Maps.
wilmap@ozemail.com.au
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 781
*************************************
