[9859] in Perl-Users-Digest
Perl-Users Digest, Issue: 3452 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 15 09:08:40 1998
Date: Sat, 15 Aug 98 06:00:47 -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, 15 Aug 1998 Volume: 8 Number: 3452
Today's topics:
Re: ActivePerl 5.005: Dynamically Generated @INC? (Tye McQueen)
Array of hashes... (Corbett J. Klempay)
Re: Array of hashes... (Mark-Jason Dominus)
Re: database on the internet <ms9x6sts@hotmail.com>
embedding perl in NT <brett.calcott@clear.net.nz>
Re: File updating question <tchrist@mox.perl.com>
Re: File updating question <tchrist@mox.perl.com>
Help for Upload File. <tse@eudoramail.com>
Re: Help with hashes and file handles please... <jdf@pobox.com>
Help with require (Russ Romei)
Re: here's an implementation of diff in perl <scribble@pobox.com>
how can I use databases in perl? <ms9x6sts@hotmail.com>
How to read multiline variable? (Ken Williams)
Re: How to read multiline variable? <jdf@pobox.com>
I need a PERL programer <anthony@santen.net>
Re: is the ActiveState Perl win32 broken or am I??? (Tye McQueen)
Re: making -w happy (Craig Berry)
Re: Named Pipes on NT (Tye McQueen)
Re: newbie-module writting (Martin Vorlaender)
Re: NT: redirect stdout to file (Gerhard Wrodnigg)
Perl to C (Mark E. Owen)
Re: Perl to C <tchrist@mox.perl.com>
perl to html <godzila@freemail.nl>
Printing in Perl amerar@unsu.com
Re: Printing in Perl (Craig Berry)
Re: problem with Win32::Registry willhackperl@my-dejanews.com
Re: Q: How to read all the file name in a directory <tchrist@mox.perl.com>
Re: Q: How to read all the file name in a directory <tchrist@mox.perl.com>
Re: timeout or time limiting function <tchrist@mox.perl.com>
Web Applications Programmer ebs@ricochet.net
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 15 Aug 1998 01:21:53 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: ActivePerl 5.005: Dynamically Generated @INC?
Message-Id: <6r39e1$mtb@fumnix.metronet.com>
dave@mag-sol.com writes:
)
) Under ActivePerl 5.005, it seems that the value of @INC is dynamically
) generated. It seems to use the directory that the executable is in to
) determine what @INC should contain. Moving perl into differnt directories and
) running 'perl -V' gives *different* results.
)
) I haven't been able to try this on a Unix version of 5.005 so I suppose it's
) possible that this is a 5.005 change rather than an ActivePerl one.
)
) Does anyone have any comments?
Originally Perl from ActiveWare (or whatever they were called back
then, maybe just MicroSoft), at least the first copy I played
with, set @INC based on a Registry setting.
In getting ActiveState's porting work merged back into the base
source code for Perl, that was changed so that Perl still had
the hard coded values but would automatically add values based
on where perl.exe was found, if those were different. But this
code only got compiled on Win32 platforms.
Then, with 5.005, the behavior that you note above was selected.
I like it.
Back when I was building Perl to Unix systems, I didn't like
that moving Perl's install directory really required recompiling
and reinstalling. But determining the location of the perl
executable isn't a fool-proof task in this environment.
But it'd be nice to have the option of deciding to install
perl such that it can figure out it current location and have
the option of compiling perl with no hard-coded paths in it.
With the Win32 code, we might be closer to having that option
on other platforms now.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: Sat, 15 Aug 1998 00:57:00 -0400
From: cklempay@acm.jhu.edu (Corbett J. Klempay)
Subject: Array of hashes...
Message-Id: <MPG.103edf251121b6eb989680@news.erols.com>
Hey all...I'm having some problems using an array of hashes...I'm
reworking a nightly cron job script that generates the homepage listing
(the thing currently being generated can be seen at
http://www2.acm.jhu.edu/homepages.html). I changed the original code
around to have each user be a hash, and each one is pushed onto an
array...after which I need to sort this big array by the lastname hash
key. The current state of the code can be found at:
http://www2.acm.jhu.edu/~cklempay/homepages.pl
The problem I'm having is like this...I have an array called
bigarray...it has all of these hashes...what's the correct way to call
sort to do this sorting I need? I'm also having problems with only the
first hash in the whole array being seeded correctly.
Note: the current generated homepage listing is generated by the original
version of the script. (there aren't any accessible pages generated by
this new script yet; it's way too devel for that).
Anyone? Please? :)
---
Corbett J. Klempay
http://www2.acm.jhu.edu/~cklempay
------------------------------
Date: 15 Aug 1998 05:42:38 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Array of hashes...
Message-Id: <6r374e$ti$1@picasso.op.net>
In article <MPG.103edf251121b6eb989680@news.erols.com>,
Corbett J. Klempay <cklempay@acm.jhu.edu> wrote:
>I need to sort this big array by the lastname hash key.
@sorted = sort { $a->{lastname} cmp $b->{lastname} } @unsorted;
--
mjd@pobox.com Mark-Jason Dominus
mjd@plover.com Plover Systems, Philadelphia, PA
------------------------------
Date: Sat, 15 Aug 1998 13:12:46 +0200
From: Tom <ms9x6sts@hotmail.com>
Subject: Re: database on the internet
Message-Id: <35D56D2E.61E4@hotmail.com>
but what can I do, if the sys admin does not allow it?
I'm using hypermart.net, free web hosting, I'm not sure if
it's allowed to install any modules.
are there other solutions to a database-interface without installing
anything?
Thanks for you help.
Tom
------------------------------
Date: Fri, 14 Aug 1998 22:53:56 +1200
From: "Brett Calcott" <brett.calcott@clear.net.nz>
Subject: embedding perl in NT
Message-Id: <6r166j$91k$1@fep5.clear.net.nz>
I have version 5.005_02 which I built using MSVC 5.0 sr3.
I have been playing with embedding perl, and just copied the examples from
perlembed.html and linked to the perl.lib as directed.
The first couple of examples seem to work (I can get the mini-perl
interpreter going) but when I try to pass some parameters I get undefined
symbols at link time. (See the first example under heading "Evaluating a
Perl statement from your C program".) Specifically with global PL_na. It
seems to be having trouble importing other global symbols too.
Any clues here???
TIA.
brett
------------------------------
Date: 15 Aug 1998 11:18:17 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: File updating question
Message-Id: <6r3qpp$spu$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Ketan Patel <kpatel@mathworks.com> writes:
:As far as I understand, '-i' has to be used at the beginning of the file
:like:
:
:#!/usr/local/bin/perl5 -i.bak
:
:Right?
Nope. As you guessed, I was referring to $^I.
@ARGV = ('more', 'files', 'here');
$^I = ".orig"; # that would be -i
while (<>) {
s/foo/bar/;
print;
}
--tom
--
"Just because you're screwed *up* doesn't mean you're screwed." --Larry Wall
------------------------------
Date: 15 Aug 1998 11:20:47 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: File updating question
Message-Id: <6r3quf$spu$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Tom Phoenix <rootbeer@teleport.com> writes:
:> :> flock DATA, 2;
:> : You should really get this value from a module, rather than use a literal.
:
:System "constants" have been known to change from one system or release to
:another. AFAIK, that value two shouldn't ever change, but that's what
:anyone would have said before Solaris (System V) came out with new values
:for socket constants. (See perlfaq8 for more info on this.)
No, that's not an same issue in this particular. Perl's flock function
is synthetic. It doesn't necessarily map to any particular native
system call. Therefore, perl has the 1,2,4,8 values well defined itself.
--tom
--
"The most merciful thing in this world, I think, is the inability of
the human mind to correlate all its contents..."
--H.P. Lovecraft, from "The Call of Cthulhu", 1926.
------------------------------
Date: Sat, 15 Aug 1998 14:28:27 +0800
From: "Eddie" <tse@eudoramail.com>
Subject: Help for Upload File.
Message-Id: <6r39v9$rrr5@news.hk.linkage.net>
Hi All.
I have a problem of the following script.
---------------------------------------------------------------------------
foreach $User_Files('UPLOADFILE1','UPLOADFILE2')
{ unless($in{$User_Files})
{next;}
my($Target_File) = $in{'$User_Files'};
$Target_File =~ s/^(.*[\\\/])([^\\\/])/$2/;
-------------------------------------------------------------------------
Why the $Target_File is not the File Name
It is the File body.
Best Regard.
------------------------------
Date: 15 Aug 1998 08:38:23 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: Carlo Robazza <carlor@sympatico.ca>
Subject: Re: Help with hashes and file handles please...
Message-Id: <iuju4b74.fsf@mailhost.panix.com>
Carlo Robazza <carlor@sympatico.ca> writes:
> I'm VERY new to Perl and I am having a problem with storing
> file handles in a hash table.
Then you will benefit greatly from reading perlfaq5, specifically the
question "How can I make a filehandle local to a subroutine? How do I
pass filehandles between subroutines? How do I make an array of
filehandles?"
You should also read perldata and perlref.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: Sat, 15 Aug 1998 11:08:46 GMT
From: romei@stampfair.com (Russ Romei)
Subject: Help with require
Message-Id: <35d56c30.5185672@news.spry.com>
Hi,
does anyone know how (if you can) require a file on another server?
ie
require "http://www.foobar.com/perlfile.cgi"
I get a file not found error
Is there any way around this?
Thanks
The StampFair ONLINE Auction. Auctions ending daily.
Over 500 lots with images. http://www.StampFair.com
------------------------------
Date: 15 Aug 1998 01:38:11 -0500
From: Tushar Samant <scribble@pobox.com>
Subject: Re: here's an implementation of diff in perl
Message-Id: <6r3acj$m7v@tako.wwa.com>
mjd@op.net writes:
>This extreme example shows that one important measure of the quality
>of a diff program is whether it finds a small set of differences.
>The example program I showed was not useful because the differences it
>found were too large, and there is a smooth continuum of quality here.
Is the running time for "common subsequence" O(mn)? Then one way to
implement a "quality" parameter would be to consider k lines as a
"line". Cuts the time by k**2, and then you may or may not decide
to burrow into each cluster of lines.
In the extreme case -- suppose you change exactly one line in a
file, and start off with clusters half the size of the file, and
dig in repeatedly, what you have got is a binary search of some
sort. Unless I am ignoring a huge bloat somewhere else...
Well, if all this is true, then you should be able to set qualities
for diffs depending on what they are likely to be, just like you
might set compression level for a jpeg depending on what you think
the image looks like...
------------------------------
Date: Sat, 15 Aug 1998 13:01:38 +0200
From: Tom <ms9x6sts@hotmail.com>
Subject: how can I use databases in perl?
Message-Id: <35D56A92.434D@hotmail.com>
I have the problem that I would need a database interface, but
the serve I use (hypermart.net) has no modules installed.
Any suggestions?
------------------------------
Date: Sat, 15 Aug 1998 07:02:10 GMT
From: tekkin@hotmail.com (Ken Williams)
Subject: How to read multiline variable?
Message-Id: <6r3bpk$e1o@cabernet.niagara.com>
This is an easy questions for someone:
#!/usr/bin/perl
$Output = `/bin/ls -l'`;
while (<$Output>)
{
(Do something with single line)
print $Output;
}
How would I accomplish the above? I can't use the while the way it is there,
because $Output isn't a file handle, its a variable. I simply want to read
the output of /bin/ls($Ouput) one line at a time so I can do something with it
first.
Thanks.
------------------------------
Date: 15 Aug 1998 08:53:10 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: tekkin@hotmail.com (Ken Williams)
Subject: Re: How to read multiline variable?
Message-Id: <g1ey4aih.fsf@mailhost.panix.com>
tekkin@hotmail.com (Ken Williams) writes:
> This is an easy questions for someone:
Not exactly. It's difficult because your assumptions about what you
want to be doing are questionable.
> #!/usr/bin/perl
> $Output = `/bin/ls -l'`;
Okay, so now the output of `ls` is in that scalar.
> while (<$Output>)
The <> operator is for reading from filehandles. You create a
filehandle with the open() function, as documented in perfunc and
perlfaq5. If you'd like to examine $Output a line at a time, you
might instead have done
chomp(@output = `/bin/ls -l`);
foreach $line (@output) { # process $line }
or you can do something like
while ($Output =~ /^(.*)$/gm) { #process $1 }
or you can make a filehandle like this
open(OUTPUT, '/bin/ls -l |') or die "$!";
while (<OUTPUT>) { #process $_ }
But the *real* question here is "Why are you using a non-portable
method of reading a directory?" Maybe you're not aware of Perl's two
built-in means of generating a list of file names (glob() and
readdir()); maybe you're not aware of the file test operators that
will give you all of the detailed information you can get from the
output of `ls -l`, without having to spawn a sub-process (well,
globbing can create a shell process). See perlfunc and perlop. And
all of the perlfaqs.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: Sat, 15 Aug 1998 11:44:50 +0100
From: "Anthony Santen" <anthony@santen.net>
Subject: I need a PERL programer
Message-Id: <6r3p82$4or$1@infoserv.netkonect.net>
I need a PERL programmer for 1 small simple project I don't know where I
should post a message.
I don't want to violate protocol on this newsgroup.
Can any-one point me in the right direction?
Anthony Santen
------------------------------
Date: 15 Aug 1998 01:00:18 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: is the ActiveState Perl win32 broken or am I???
Message-Id: <6r385i$bhp@fumnix.metronet.com>
"Brent Verner" <REPLY_TO_damonbrent@earthlink.net> writes:
)
) this code works on the LM and GS ports 5.004_02 (and any UN*X Perl), but the
) ActiveState [ 5.003_7(build 316) or 5.005 ] ports will *NOT* run the above
) code.
"will *NOT* run" is *NOT* a good problem description. If you
give us a good problem description (what happens, precisely,
and how that differs, precisely, from what you expected), then
we might be able to help.
) binmode(STDIN);binmode(STDOUT);binmode(STDERR);
)
) while($this_much = read STDIN, $buffer, 1024)
) {
) print $buffer;
) }
Using ActivePerl 5.004_69, it certainly "runs" for me:
perl temp.pl <temp.pl
faithfully prints the above code to my console window.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: 15 Aug 1998 05:03:46 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: making -w happy
Message-Id: <6r34ri$i3i$2@marina.cinenet.net>
Rich Morin (rdm@cfcl.com) wrote:
[snip]
: -w is complaining (-w needs to chill :-) because a few variables are "used
: only once". That's because they are used only once ;-) - actually, they
: are defined in the require'd file and used once in the script.
[snip]
: Is there a way for me to tell -w that this variable has been defined in
: the require'd file?
perldoc -f vars
Do
use vars qw(%foo $bar @baz);
in the script (the one doing the require), where the variables listed are
the ones generating warnings.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 15 Aug 1998 00:49:42 -0500
From: tye@fumnix.metronet.com (Tye McQueen)
Subject: Re: Named Pipes on NT
Message-Id: <6r37hm$6jg@fumnix.metronet.com>
"R. Player" <player@avoidspam.com> writes:
) Does anyone know how to create a named pipe in perl on NT....are named
) pipes even supported
) on NT-Perl.
I'm not aware of any Perl modules providing NT named pipes. It
isn't too much work to write Win32API::NamedPipe and then you can
do anything with named pipes in perl that you can in C and in
about the same way. With a little more work, you can also make
using them from Perl easier than using them from C.
See http://www.metronet.com/~tye/alpha/Win32API/ for some examples
and more information. Win32API::Registry has the best documentation.
--
Tye McQueen Nothing is obvious unless you are overlooking something
http://www.metronet.com/~tye/ (scripts, links, nothing fancy)
------------------------------
Date: Sat, 15 Aug 1998 12:13:04 +0200
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: newbie-module writting
Message-Id: <35d55f30.524144494f47414741@radiogaga.harz.de>
Max M. Stalnaker (stalnaker@acm.org) wrote:
: I have been maintaining these perl cgi scripts on NT using activestate port
: for a couple years. I now need to make some repetitive modifications and
: would like to a subroutine placed in another file, but I do not quite have
: the hang of it.
[...]
: common.pm did not return a true value at c:\InetPub\scripts\login.pl line 9.
: BEGIN failed--compilation aborted at c:\InetPub\scripts\login.pl line 9.
: For what it is worth, I think this may have something to do with those naked
: 1's in some packages, but I can not quite see where to put them.
The diagnostics for the above error (for example, via the splain script)
read:
(F) A required (or used) file must return a true value to indicate that
it compiled correctly and ran its initialization code correctly. It's
traditional to end such a file with a "1;", though any true value would
do. See perlfunc/require.
The documentation about "require" (on which "use" is based) says:
The file must return TRUE as the last statement
to indicate successful execution of any initialization code, so
it's customary to end such a file with "1;" unless you're sure
it'll return TRUE otherwise. But it's better just to put the
"1;", in case you add more statements.
Which part of this documentation do you have problems with?
Oh, I see, "using activestate port"... You can get the standard perl
documentation at CPAN.
cu,
Martin
--
| Martin Vorlaender | VMS & WNT programmer
OpenVMS: Where do you | work: mv@pdv-systeme.de
want to BE today? | http://www.pdv-systeme.de/users/martinv/
| home: martin@radiogaga.harz.de
------------------------------
Date: Sat, 15 Aug 1998 12:54:48 GMT
From: ghw@gmx.net (Gerhard Wrodnigg)
Subject: Re: NT: redirect stdout to file
Message-Id: <35fd84e5.191690195@news.tu-graz.ac.at>
Hello!
On Fri, 14 Aug 1998 16:17:06 GMT, Brent Michalski <perlguy@inlink.com>
wrote:
>If I remember correctly, put the full path information, including the
>drive letter, for your output file.
>
>Like
>sample.pl > c:/mydir/output.txt
The file is created, but still no content :(
-mfg-ghw-
--
In a world without walls and fences, who needs windows and gates?
------------------------------
Date: Sat, 15 Aug 1998 08:28:40 GMT
From: meowen@btinternet.com (Mark E. Owen)
Subject: Perl to C
Message-Id: <35d5468d.4146105@news.btinternet.com>
Is there a Perl to C compiler in existance?
Thanks
Mark E. Owen
------------------------------
Date: 15 Aug 1998 11:47:44 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Perl to C
Message-Id: <6r3sh0$168$4@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, meowen@btinternet.com writes:
:Is there a Perl to C compiler in existance?
It would very likely do you no good. Now go read the FAQ to learn why.
--tom
--
I forgot what it was like to be a tester...
If you have a conscience, it's not easy
-- Dean Roehrich, soon after coming back from Marketing
------------------------------
Date: Sat, 15 Aug 1998 12:37:44 +0200
From: <godzila@freemail.nl>
Subject: perl to html
Message-Id: <6r3o2l$3g9$1@news.worldonline.nl>
I've wrote a perl scrip like this:"myperl.pl"
more syslog.log |grep "Lansession up"
my question is of it is possible to call myperl.pl in a html page, so that
when I press the url that call myperl.pl it show me the output in plain
text.
I want to view the syslog file by me brouwser, thus not the hole file.
Any ideas?
Thanks
Mike
------------------------------
Date: Sat, 15 Aug 1998 06:51:41 GMT
From: amerar@unsu.com
Subject: Printing in Perl
Message-Id: <6r3b5t$6te$1@nnrp1.dejanews.com>
Hello,
I want to dynamically generate an HTML page based on user input. How can I
print directly to the users screen without having to create an HTML file
first? What do I need to put into my code to re-direct STDOUT to the modem?
Please e-mail responses.....and thank you.
Arthur
amerar@unsu.com
http://www.unsu.com
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 15 Aug 1998 07:32:07 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Printing in Perl
Message-Id: <6r3dhn$r2o$1@marina.cinenet.net>
amerar@unsu.com wrote:
: I want to dynamically generate an HTML page based on user input. How can I
: print directly to the users screen without having to create an HTML file
: first? What do I need to put into my code to re-direct STDOUT to the
: modem?
Not really a Perl question, but...
What you're groping toward is called CGI, "Common Gateway Interface."
It's a protocol whereby a web server, on receiving a request for a URL,
runs an application with some special environment and STDIN setup. What
that app sends to STDOUT becomes the page served to the client (user).
The module CGI.pm (included with recent Perl distributions) makes coding
CGI apps in Perl much simpler. If you pursue this, I recommend using it.
: Please e-mail responses.....and thank you.
Ask here, read answer here...and you're welcome.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: Sat, 15 Aug 1998 11:37:43 GMT
From: willhackperl@my-dejanews.com
Subject: Re: problem with Win32::Registry
Message-Id: <6r3ru8$ph6$1@nnrp1.dejanews.com>
In article <6r1s2b$u1$1@nntp2.ba.best.com>,
"Leo Liou" <leoliou@pacbell.net> wrote:
> How does one step through all subkeys and values in a RegsitryObject? What
> are the methods?
There's a good example in Win32::OLE::Const.
Bill
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 15 Aug 1998 11:41:44 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Q: How to read all the file name in a directory
Message-Id: <6r3s5o$168$2@csnews.cs.colorado.edu>
In comp.lang.perl.misc,
oliver.REMOVE.cook@bigfoot.DELETE.com writes:
:Don't you think it's odd how two people answered my answer kindly,
:nicely and to the point, and you flew off the handles?
No REMOVE I really don't THIS think so, since COVERT the point SENTENCE is
that I TO don't believe GET in giving quarters AT for hooch to beggars
THE who are standing REAL right outside MESSAGE the soup question.
You HIDDEN must teach WITHIN them to IT help themselves.
--tom
--
#ifdef USE_STD_STDIO /* Here is some breathtakingly efficient cheating */
--Larry Wall, from sv.c in the v5.0 perl distribution
------------------------------
Date: 15 Aug 1998 11:36:40 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Q: How to read all the file name in a directory
Message-Id: <6r3rs8$168$1@csnews.cs.colorado.edu>
[courtesy cc of this posting and politeness denied due to poster's
obnoxious address munging policy, which is illegal and must be
chastised]
:I'm new around here, so I'm still trying to figure out how trashing people is
:useful. Evidently it is not only useful, it is _very_ useful, judging by the
:amount of effort spent doing it. For example, you just spent twice as much
:effort trashing the guy as you would have spent answering his question.
It is my policy not to give to someone online any Perl information they
could get from reading the standard online Perl documention -- beyond
telling them where to find that information.
I can tell you're new around here, because you obviously haven't figured
out yet that these energy-sucking lazy sorts will just keep coming back
for free handouts. We have to teach them to read. Ignorance of the
documentation is no excuse. They shouldn't be using Perl all all if
they can't read its documentation. They should go back to flipping
hamburgers or whatever the nontechnical types and non-self-enabling
types normally do.
Now that the helpless Prisoners of the Evil One have inundated us,
it's Forever September here on the net, a time of sempiternal ignorance
and incompetence. It can only get worse. Stamping out these selfish
leeches has nothing to do with ego. It has everything to do with what
is expected and acceptable social behaviour, and with what is scalable.
A million sloppering programmer-wannabes from CP/M hell who cannot or
will not read the standard docs is simply not scalable, and thus not
tolerable. Not looking first to one's own manuals is unacceptable --
because it will soon drown out everything else.
So we must be harsh. Call it tough love. If they insist on remaining
forever an illerate leech, then they have no business here. If they learn
from chastisement, then the problem is cured. Thus it has been on USENET
for the last fifteen years that I've been reading and posting regularly.
I used to be on the other end, but I was apparently gifted with a lost
art: I knew how to read and learn from documentation and source code.
Anyone who is going to get anywhere does.
We'll put you on idiot-answering service for a few years and we'll
see how sweet you remain.
--tom
--
I hate programs that chdir --Boyd Roberts
------------------------------
Date: 15 Aug 1998 11:45:27 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: timeout or time limiting function
Message-Id: <6r3scn$168$3@csnews.cs.colorado.edu>
In comp.lang.perl.misc, an Lame Address Munger <grant.griffin@nospam.com>
toothlessly trolls:
:> *WHY* do people come here before grepping in their own documentation?
:
:Just when are these newbies ever gonna learn?
:(How about providing a URL next time?)
This is the fundamental flaw. THE WEB IS NOT THE FONT OF WISDOM.
The documentation is RIGHT THERE ON THEIR SYSTEM. They have to
learn this. Unplug the net. Now go back to work. Notice
perl is still there. Notice its documentation is still there.
Screw the web. Learn to program. Learn to read.
--tom
--
``I do quarrel with logic that says, `Stupid people are associated with X,
therefore X is stupid.' Stupid people are associated with everything.''
--Larry Wall in <1992Dec31.203724.26018@netlabs.com>
------------------------------
Date: Sat, 15 Aug 1998 06:00:52 GMT
From: ebs@ricochet.net
Subject: Web Applications Programmer
Message-Id: <6r386k$3o4$1@nnrp1.dejanews.com>
A pioneer in the emerging digital greetings market, is
looking for individuals who have loads of talent and
thrive in a team environment. They have created a
community without walls, where anyone from any
department can share ideas with anyone else, and is
encouraged to do so!
This is a dynamic pre-IPO E-commerce company with
great benefits, competitive pay, and stock options.
As a result of significant growth, there is an
immediate need for a Web Applications Developer who
will develop, extend, and maintain the framework on
which this organization runs, including both
transaction processing and fulfillment.
You will develop components of an object-oriented
system using standard o-o methods. You will implement
designs in Java and C++ on UNIX, and collaborate on
numerous projects (including web applications) with
multiple departments throughout the company.
QUALIFICATIONS: We are looking for a seasoned
programmer with a BS in Comp Science with at least
three years of experience writing RDBMS applications
and 3 years of UNIX experience. You have written
products in either C, C++, or Java with a track record
of working on teams that delivered on aggressive
goals. You are able to solve complex problems, have a
fast learning curve, and are experienced in working
with populated databases.
Pluses are experience with process monitoring, UNIX
shell programming and/or inter-process communications,
and familiarity with financial transaction systems.
Interested candidates are invited to email resumes to:
ebs@ricochet.net
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 3452
**************************************
