[16296] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 3708 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 18 09:22:50 2000

Date: Tue, 18 Jul 2000 06:22:35 -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: <963926555-v9-i3708@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Tue, 18 Jul 2000     Volume: 9 Number: 3708

Today's topics:
    Re: Beginer with question on simple perl/cgi form (Abigail)
    Re: Beginner Question (Will England)
        Best solution for this? ()
    Re: Best solution for this? (spurcell)
    Re: Best solution for this? ([    Dr. Jeff    ])
    Re: Best solution for this? (Harry of Harryworld)
    Re: Best solution for this? (Low Roller)
    Re: Best solution for this? (Jennifer \"Jennova, Angelface of Death\" Martino)
    Re: Beyond perl? Need advice... ()
    Re: Beyond perl? Need advice... ()
    Re: Bizarre BEGIN block problem ()
    Re: Bizarre BEGIN block problem (Tad McClellan)
    Re: Bizarre BEGIN block problem (Drew Simonis)
    Re: Bizarre BEGIN block problem (Tad McClellan)
    Re: Bizarre BEGIN block problem (Abigail)
        bless loses inheritance? ()
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 17 Jul 2000 19:30:06 GMT
From: abigail@delanet.com.bbs@openbazaar.net (Abigail)
Subject: Re: Beginer with question on simple perl/cgi form
Message-Id: <3bRMkX$VOM@openbazaar.net>

blue_haulic (fattahipourNOfaSPAM@usa.net.invalid) wrote on MMDVIII
September MCMXCIII in <URL:news:062fbe57.38f89055@usw-ex0109-068.remarq.com>:
-- I have a perl/cgi form that inputs as one of its values the
-- user's email address and area code.  The problem is that I'm
-- trying to route the form's contents depending on what area
-- code is inputed.  That is, if the area code is 619, I need
-- it to go to john@anywhere.com.  If the area code is 858, I
-- need it to go to amy@mars.net.  And so on...  I'm really
-- stumped on how to do this.  I've tried a bunch of different
-- things but they just aren't getting me anywhere.  Any help
-- would be greatly appreciated.  Thanks.


my @address;
   $address [619] = 'john@anywhere.com';
   $address [858] = 'amy@mars.net';

my $area_code     =  some_function_that_finds_the_area_code;

my $send_to       = $address [$area_code] or die "Can't find address!\n";

 ... Do wantever you need to do to send mail to $send_to ...



Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
         / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
         % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
         BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'


------------------------------

Date: 12 Jul 2000 15:50:03 GMT
From: will@mylanders.com.bbs@openbazaar.net (Will England)
Subject: Re: Beginner Question
Message-Id: <3bNLZT$Wzb@openbazaar.net>

On Wed, 12 Jul 2000 16:31:52 +0100, Duncan Drury
<d.drury@spamoffucl.ac.uk> wrote:
>Am I right in thinking that $fred{$key} is completely different to $fred?  I
>think it refers to the scalar variable referenced by $key in the hash %fred.
>Argh, but I can't tell if I am right or wrong!
>

In a nutshell, Yes.  :-)

To elaboryte, $fred is a single scalar; $fred = 16.

%fred is a hash, which is an array using keys instead of numbers
for placeholders.

@fred is a conventional array.

To compare:


     Hash %fred:                  Array @fred:
-----------------------------------------------------
  key     | value         |       key   |  value
  -------------------     |       -------------------
  make    | ford          |        0    |  ford
  model   | taurus        |        1    |  taurus
  color   | blue          |        2    |  blue
  trans   | auto          |        3    |  auto

Now, we've got a similar set of values stuffed into both an
array and a hash.

To access any one of the data values in the array, we reference
it like this:

    $fred[2]          #This returns the value 'blue'.

Which means this:  Return the scalar value of whatever is stored
                   in the third slot of array @fred.

"Third" slot you ask?  Yes.  Remember, arrays start numbering
at 0, not 1 in perl.  Another benefit of hashes is that you
have the named keys for reference.

Accessing hashes is similar, and gives you the mnemonic key to
work with as well.  Ex:

    $fred{'color'}   #This also returns the value 'blue'.

Which means this:  Return the scalar value of whatever is stored
                   in the slot named 'color' in the hash %fred.

Now, we still have the old $fred from above which still contains
a single value.

Usage:

print "I have a $fred{'color'} $fred[0] $fred{'model'} and \n";
print "I can drive it when I'm $fred years old.\n";

This returns:

I have a blue ford taurus and
I can drive it when I'm 16 years old.

perldoc perlvar will explain all of this as well.

HTH,

Will


--
  "If Al Gore invented the Internet, then I invented spellcheck!"
      Dan Quayle, quoted at the National Press Club, 8/3/1999
         pgpkey at http://will.mylanders.com/pub_pgp.asc
  Recovery page: http://will.mylanders.com/    will@mylanders.com


------------------------------

Date: 17 Jul 2000 15:20:03 GMT
From: anonmix@home.com  private.citizen  for the people by the people.bbs@openbazaar.net ()
Subject: Best solution for this?
Message-Id: <3bRGM3$SSV@openbazaar.net>

What over the counter remedy is the best for butt fungus?


------------------------------

Date: 17 Jul 2000 17:40:02 GMT
From: skpurcell@hotmail.com.bbs@openbazaar.net (spurcell)
Subject: Re: Best solution for this?
Message-Id: <3bRK53$VCH@openbazaar.net>

java ...
<anonmix@home.com private.citizen for the people by the people> wrote in
message news:XFHF3YCM36724.4357638889@private.citizen...
> What over the counter remedy is the best for butt fungus?
>
>


------------------------------

Date: 17 Jul 2000 20:00:09 GMT
From: anti@spamming.org.bbs@openbazaar.net ([    Dr. Jeff    ])
Subject: Re: Best solution for this?
Message-Id: <3bRNaB$W5p@openbazaar.net>

In article <XFHF3YCM36724.4357638889@private.citizen>,
anonmix@home.com  private.citizen  for the people by the people wrote:
>What over the counter remedy is the best for butt fungus?

        KY Jelly and your favourite finger or tongue.

--
  This signature file is dedicated to Da Gothic Angel herself, Nitallica.
  Dr. Jeff is Nitallica's number one fan, willing slave, and keeper of
  the strap-on boots she wears when in full battle mode. He also gets the
  blueberry squishies whenever she mentions his name. :-)


------------------------------

Date: 17 Jul 2000 21:00:04 GMT
From: harryworld@home.com.bbs@openbazaar.net (Harry of Harryworld)
Subject: Re: Best solution for this?
Message-Id: <3bRPF4$Xrf@openbazaar.net>

anonmix@home.com, private.citizen, for, the, people, by, the, people
wrote:
>
> What over the counter remedy is the best for butt fungus?

Try Popeil's Pocket Fungus-Hawg.  This powerful little clipper
(batteries not included) will make short work of that rampant mycelium.
When the Fungus-Hawg's patented Fungus-Klippingz reservoir is full, just
empty it into a skillet and saute the fungus in a little olive oil and
garlic cloves.  Great on buttecelli pasta!  The Fungus-Hawg also chops,
slices, dices, and makes great fungus fries!  And you get twelve free
steak knives.
--
Laughter is the true seriousness that destroys all false seriousness.
--M.M. Bakhtin
************************************************
For those pesky pills that won't give it up, check out the extraction
page:
http://members.home.net/harryworld/extraction.html


------------------------------

Date: 17 Jul 2000 21:40:02 GMT
From: roll@night.com.bbs@openbazaar.net (Low Roller)
Subject: Re: Best solution for this?
Message-Id: <3bRQH5$WK7@openbazaar.net>

Get a poodle and rub meat on your hole
anonmix@home.com private.citizen for the people by the people wrote in
message ...
>What over the counter remedy is the best for butt fungus?
>
>


------------------------------

Date: 18 Jul 2000 02:10:02 GMT
From: twpyhr@mindspring.com.bbs@openbazaar.net (Jennifer \"Jennova, Angelface of Death\" Martino)
Subject: Re: Best solution for this?
Message-Id: <3bRXIS$VS3@openbazaar.net>

Harry of Harryworld wrote:

> Try Popeil's Pocket Fungus-Hawg.  This powerful little clipper
> (batteries not included) will make short work of that rampant mycelium.
> When the Fungus-Hawg's patented Fungus-Klippingz reservoir is full, just
> empty it into a skillet and saute the fungus in a little olive oil and
> garlic cloves.  Great on buttecelli pasta!  The Fungus-Hawg also chops,
> slices, dices, and makes great fungus fries!  And you get twelve free
> steak knives.

muahaha.

jenn
eeeee e   e  e eeeee e    e e   e eeeee  the web page you have reached
  8   8   8  8 8   8 8    8 8   8 8   8  http://twpyhr.usuck.com
  8e  8e  8  8 8eee8 8eeee8 8eee8 8eee8e Over 250 telephone sounds and
  88  88  8  8 88      88   88  8 88   8 recordings, The Unofficial
  88  88ee8ee8 88      88   88  8 88   8 Touch Tone Tunes FAQ and The
					 Phoney Dance.


------------------------------

Date: 11 Jul 2000 21:50:01 GMT
From: dejajason@my-deja.com.bbs@openbazaar.net ()
Subject: Re: Beyond perl? Need advice...
Message-Id: <3bMfTO$VaP@openbazaar.net>

In article <MPG.13d5214125adbaa998abb4@nntp.hpl.hp.com>,
  Larry Rosler <lr@hpl.hp.com> wrote:
> In article <8kfl5l$skp$1@nnrp1.deja.com> on Tue, 11 Jul 2000 17:23:23
> GMT, dejajason@my-deja.com <dejajason@my-deja.com> says...
>
> ...
>
> > Milliseconds?!  I just finished converting a program from perl to C
and
> > it turned an 18 minutes run-time into 36 seconds.
>
> Really?  Did you change any algorithms, or just do a simple
translation?
>
> It would be very instructive if you were to publish the parts of the
> program that executed 30 times slower in Perl than in C.

I'm not sure how the algorithm applies to the point.  Perl programs will
always require more resources than equivalent programs in a native
compiled language like C or C++.  It's just the nature of the
architecture.  I've yet to see a case where the opposite is true but it
would be interesting to see if one exists.

>
> ...
>
> >                       When you start getting to large programs,
> > you also end up hitting problems due to the lack of code correctness
> > tools in the language. (like type checking).  It's real easy to make
a
> > typo that causes no compile errors but adds hard to find bugs.
>
> That is what the '-w' flag and the 'use strict;' pragma are intended
to
> deal with.  They should be used in every Perl program.  Did you use
them
> in yours?

That helps with accidently getting a variable from a differant scope and
a few things like mis-typing a single instance of a variable, but it's
still rather limited.    I've seen lots of cases where variables were
mis-types the same way more than once, alpha characters were assigned
where a number was expected, a hash values in a data structure was
mis-typed, values were left out of a data structure, parameters were
passed to a function in the wrong order, etc.  It's all stuff that's
manageable for small programs but can create a lot of headaches when
they get larger.  Not that any language can avoid these, but if you have
to declare structures, variable types, and parameters, the compiler will
catch a lot more and programmers have a well defined reference.

>
> > It does come in real handy for writing helper scripts for
administrators
> > and developers.
>
> And for writing real production programs where bit/byte computation
> speeds don't dominate the performance.

Actually, I would say it's effective for data conduits.  Like from a web
browser into a database and back out with HTML using an application
server to save on startup cost.


Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: 12 Jul 2000 21:30:10 GMT
From: dejajason@my-deja.com.bbs@openbazaar.net ()
Subject: Re: Beyond perl? Need advice...
Message-Id: <3bNUSY$XPk@openbazaar.net>

In article <xkflmz7jgwz.fsf@valdemar.cos.agilent.com>,
  Eric The Read <emschwar@rmi.net> wrote:
> dejajason@my-deja.com writes:
> > Just code a quick bubble sort in both languages, and you'll see
speed
> > difference of 30 or more.
>
> I just did that very thing.  I used the exact same algorithm in both
> programs; the only difference was C vs. Perl.  Both programs loaded an
> array with 10,000 random elements, and then bubblesorted that array.
I
> ran both programs once first to make sure they were in the disk cache,
> then ran them with 'time'.  The results:
>
> $ time /tmp/bbsort
>
> real       27.1
> user       25.8
> sys         0.1
>
> $ time /tmp/bbsort.pl
>
> real       10.5
> user        8.7
> sys         0.5
>
> So the difference was not 30; it was more like a factor of 3, and in
> favour of the Perl implementation.  I should note for the benefit of
the
> peanut gallery, that this is a very old version of perl (5.004), on a
> fairly old HP-UX box (712/100MHz, running 10.20).  Presumably modern
> Perls could optimize better.
>
> Wow, I think my sigmonster's psychic.  Good sigmonster!  Have a
biccie!

Well the results from the C program look right, but I think something
isn't right with the perl. Here's my results on a Sun S20 which is a bit
slower than that HP.  Perl 5.005_03 and gcc 2.29.2.

/usr/bin/time ./csort

real       37.5
user       35.2
sys         0.0

/usr/bin/time ./perlsort.pl

real    19:03.1
user    18:39.5
sys         0.0

Oddly enough, the differance is larger with 1000 elements but that could
be due to startup penalty.  I didn't have enough patients to try more
than 10,000.

And the code:
#!/usr/local/bin/perl -w

$arraysize=10000;
for ($i=0;$i<$arraysize;$i++) {
    $array[$i]=rand(100);
}

for( $i=0 ; $i < $arraysize-1 ; $i++) {
    for( $j= $i+1 ; $j<$arraysize ; $j++ ) {
        if ($array[$i]>$array[$j]) {
            $k=$array[$i];
            $array[$i]=$array[$j];
            $array[$j]=$k;
        }
    }
}
exit(0);

#include <stdio.h>
#include <stdlib.h>

#define ARRAYSIZE 10000

int main(int argc, char *argv[]) {
  int i,j;
  double k, array[ARRAYSIZE];

  for(i=0;i<ARRAYSIZE;i++)
    array[i]=drand48()*100;

  for(i=0;i<ARRAYSIZE-1;i++)
    for(j=i+1; j<ARRAYSIZE; j++)
      if (array[i]>array[j]) {
        k=array[i];
        array[i]=array[j];
        array[j]=k;
      }
  exit(0);
}



Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: 13 Jul 2000 15:00:02 GMT
From: pkay01@my-deja.com.bbs@openbazaar.net ()
Subject: Re: Bizarre BEGIN block problem
Message-Id: <3bO9j2$Xq5@openbazaar.net>

In article <Umjb5.62289$_b3.1817863@newsread1.prod.itd.earthlink.net>,
  "Ed Foy" <ed@nospam.com> wrote:
> Greetings,
>
> I am having a problem with a BEGIN block.  There must be a simple
answer
> but I have been unable to find it after two weeks of debugging.
>
> Environment: Perl 5.004 under UNIX.
>
> What I am trying to accomplish is to redirect STDERR to STDOUT so
that I
> can see runtime errors via HTTP (this works). The problem is that I am
> getting a compile error that I cannot resolve. Since everything
> "appears" to work this "seems" to be a spurious problem; but, because
I
> cannot isolate the cause of the problem I can't be certain that the
> error notification is really harmless. I've reduced the code to the
> following (verbatim) to demonstrate the problem:
>
> #!/usr/local/bin/perl5
>
> require 5.004;
>
> BEGIN {
>     print "Content-type: text/html\n\n";
>     open (STDERR, ">&STDOUT") or die "Cannot Redirect STDERR: $!";
> }
>
> my $Dummy = "";
> exit;
>
> The above code results in the following error message on compilation:
>
> TEST.PL contains syntax errors.
> Content-type: text/html\n\n
>
> For some reason the "Content-type: text/html\n\n" is a problem. If I
> comment out the print statement or move the print statement outside
the
> BEGIN block then there is no error. If I assign the string to a
variable
> it still fails as in:
>
> BEGIN {
>     $foo = "Content-type: text/html\n\n";
>     print $foo;
>     open (STDERR, ">&STDOUT") or die "Cannot Redirect STDERR: $!";
> }
>
> The one response I received to a prior post about this problem
indicated
> that the above code compiles fine on Perl 5.002 running on OS/2 so
long
> as the require statement is removed. Not much help since I am running
> under Perl 5.004 under UNIX, as stated earlier,  on DEC ALPHA
servers. I
> need a solution that applies to my specific target environment - Perl
> 5.004 under UNIX.
>
> If anyone can point to a solution to this problem it would very much
be
> appreciated. I have been unable to find anything in the Camel book or
> perldocs or searching the web to explain this error.
>
> Ed
>
>


Why not try using the CGI module, and let the CGI functions do the
tricky stuff for you;

  #! /usr/bin/perl -w

  use CGI qw(:standard);

  print
    header,
    start_html(-title=>'Example HTML Page'),
    start_form,
    h1("Enter text"),
    p,
    textfield(-name=>'whatever', -size=>50),
    p,
    hr,
    submit(),
    end_form,
    end_html;


Hope that helps!
Pete


Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: 13 Jul 2000 15:10:03 GMT
From: tadmc@metronet.com.bbs@openbazaar.net (Tad McClellan)
Subject: Re: Bizarre BEGIN block problem
Message-Id: <3bOA9T$YiV@openbazaar.net>

[ There is no   comp.lang.perl   newsgroup.
  It was rmgrouped *several* years ago.
  It is beginning to look like you should find a provider
  that is not lost in a time warp...
]


On Thu, 13 Jul 2000 13:20:52 GMT, Ed Foy <ed@nospam.com> wrote:

>Greetings,


Yo.


>The one response I received to a prior post about this problem


You asked me to look at that post, so I did.

What I had to say was better said in email, so I sent you one.

It bounced.

So I went back to your post to find the correct email address.

There was none.

You cannot be reached by email.



I have a hard and fast rule about such situations.

I gotta give you your own personal killfile entry.

And this is a shame, as I'd like to help you (and your daughter,
who should continue to reprimand you for not having "use strict"
from the gitgo).


If you change posting addresses (or wait 2-3 months), I'll start
seeing your posts again.

Sorry  :-(


>I
>need a solution that applies to my specific target environment - Perl
>5.004 under UNIX.
 ^^^^^


What I was going to say in email:


I (and probably everybody else) have no interest in potential bugs
in two year old software.

Sticking with 5.004 is volunteering for support problems.



--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: 14 Jul 2000 01:10:02 GMT
From: care227@attglobal.net.bbs@openbazaar.net (Drew Simonis)
Subject: Re: Bizarre BEGIN block problem
Message-Id: <3bOPdW$X5d@openbazaar.net>

Ed Foy wrote:
>
> Hmmm...not very professional. In fact, the question was in earnest and

I still can't grasp why people expect you to act as you are in
a business meeting while posting to a NG.  I'm here for fun,
to relax and to learn.  I'm not here to make sure that I am
behaving consistent with my companies corporate culture or in
line with generations of Ms. Manners.

> consistent with your statement. With new projects it is reasonable to
> start with a clean sheet and people who can work with currency. Those
> who are wedded to the "old ways" are fine for maintenance projects but
> useless for new projects.

I think Tad's point was exactly that.  Using old technology isn't
the way to go.  Or did I misread?

> FYI, apart from asking the occasional question in NGs, I follow the
> questions, response, the names of the players and their companies. It is
> exceedingly useful to do so. Resumes are twitted out based on NG
> activity and companies are also similarly excluded.

The most competent people I know at work refuse to mingle with
the rabble in newsgroups. (I think by association I am rabble)
Or they just don't have time.  Sounds like you'd be excluding
alot of these people if what you say is indeed true.

 > I do not know if SGML is your employer or a pseudonym for your

SGML = Standard Generalized Markup Language.  Its a language for
making markup languages like HTML in.  I would gather that Tad helps
folks use SGML.

> unemployment. It matters not as both are now listed in the twit file.
> You complete childishness and lack of professionalism speak volumes.

Not meaning to jump in, but your weenie wagging is a bit childish
as well.

> Alas, yes, I'm one of those stupid executive management types. But on
> the bright side, I'm on the top of the heap when it comes to who gets
> their next paycheck and who doesn't, who gets a contract and who
> doesn't, and who we conduct business with and who we don't. This facet
> makes up for being so stupid.

I wish my executives recognised their stupidity =)
 
> For others in the NG take heed. It is common practice for management and
> human resources types to follow NGs for the purpose of establishing
> competency in professional fields.

Oh crap.  Maybe I'd better write some filtering software for when
my rude factor exceeds a certain limit.  It can add a smiley, and
everyone will be happy.  Then I can get a job I like.  Yay.  (Did
the smiley above lessen the rudeness of calling executives stupid?)

>
> Just gotta love these NGs!
>

Yay


------------------------------

Date: 14 Jul 2000 14:30:02 GMT
From: tadmc@metronet.com.bbs@openbazaar.net (Tad McClellan)
Subject: Re: Bizarre BEGIN block problem
Message-Id: <3bOkVQ$XTh@openbazaar.net>

On Thu, 13 Jul 2000 22:50:58 GMT, Ed Foy <ed@nospam.com> wrote:
>
>Tad McClellan wrote in message ...
>>On Thu, 13 Jul 2000 17:53:05 GMT, Ed Foy <ed@nospam.com> wrote:
>>>
>>>Does this comment mean SGML Consulting will only work with the "Latest
>>>and Greatest" implementation of something or reinvents the wheel
>because
>>>the original wheel doesn't use the latest set of bugs?
>>
>>
>>Ad hominem attack.
>>
>>I'm not feeling sorry anymore.
>>
>>*plonk*
>
>
>Hmmm...not very professional.


Well yes, attacking a person instead of the person's ideas
_is_ unprofessional. You should try to avoid doing that in
a public, archived, forum.


Making a killfile entry is not unprofessional.

Suffering fools is not a requirement of "professionalism".


>In fact, the question was in earnest and
>consistent with your statement.


No it isn't.

Here's my statement again:

>>I (and probably everybody else) have no interest in potential bugs
>>in two year old software.


There is nothing there regarding the technology that I
consult in, nor about how current the software that I use is.

If I decide to use unmaintained software, I realize that all
of its support is up to me. I don't like supporting OPC, and
so avoid using unsupported software whenever possible.

It does not make business sense to spend time fixing bugs
that have already been fixed. I just go get the patch.


>With new projects it is reasonable to
>start with a clean sheet and people who can work with currency. Those
>who are wedded to the "old ways" are fine for maintenance projects but
>useless for new projects.


So your ISP is fine for maintenance projects but useless
for new projects!

At least we agree on that.



Find a better ISP, or live with the bugs.

It is your decision to stick with unsupported software. Don't
expect the Perl community to help you overcome the consequences
of *your* decision.

You've decided to go it alone, so you are, well..., alone.

Fix the bug yourself (or change your decision).


>FYI, apart from asking the occasional question in NGs, I follow the
>questions, response, the names of the players and their companies.


Then you have doubtless seen the thousands of Perl questions
that I have answered here over the years.

Why would you want to exclude yourself from getting answers
to Perl questions that may come up in the future?

All you would have had to do was add an ".invalid" after the ".com",
and none of this would have happened!


>It is
>exceedingly useful to do so.


Yes. You might even pick up on how to spam block effectively.

Or maybe not...


>Resumes are twitted out based on NG
>activity and companies are also similarly excluded.


I have used that approach myself many times while evaluating candidates.


>I do not know if SGML is your employer


SGML Consulting is a _verb_, like the Perl programming also
listed in my .sig.

SGML is a technology ( comp.text.sgml ). It was used by the w3c
to define their markup language (HTML) and is the father of
the (stripped-down) XML technology.



I do not have an "employer".

Don't want one either.

I prefer having "clients".


>or a pseudonym for your
>unemployment.


My periods of unemployment are by _design_.

I make more now working 25 weeks a year than I did working
46 weeks a year as a captive employee at a Fortune 50 company.

(Oh. They seem to have dropped in the ranking a bit, so make
 that a "Fortune 52" company then.
:-)


The well-worn "consulting is a euphemism for unemployment" joke
is nearly always invoked by captives.

Pardon me, but your jeolousy is showing...


>It matters not as both are now listed in the twit file.
                                              ^^^^

There you go with that "latin phrase" thingy again.

Name calling is still unprofessional.

And since you have decided to killfile the technologies I work with,
you should also make an entry for Perl.

(_that_ should cut down on the number of posts to read here
 in clp.misc.
)


>You complete childishness and lack of professionalism speak volumes.


I am completely comfortable with readers of this thread deciding
which of us fills those rolls.


>Alas, yes, I'm one of those stupid executive management types.


Well that explains your not grasping the basics of spam blocking at least.

Nobody expects PHBs to understand the technologies that they use.


>But on
>the bright side,


You seem (in this thread anyway) to be on the errr, ... "other" side.


>I'm on the top of the heap when it comes to who gets
>their next paycheck and who doesn't, who gets a contract and who
>doesn't, and who we conduct business with and who we don't.


Congratulations!


>This facet
>makes up for being so stupid.


So says you.

Those suffering under your stupidity may be of a differing opinion.


>For others in the NG take heed. It is common practice for management and
>human resources types to follow NGs for the purpose of establishing
>competency in professional fields.


Too true.


>Those who cannot conduct themselves
>in a professional manner in a professional forum will behave the same
>way in the work environment. So if you don't mind limiting your
>horizons, by all means, get out in public and be a complete jerk


Conforming to netiquette is not being a jerk, it is being clueful.

You should try it.


>The same applies to your employer.


But I don't have one of those.


>Any company willing to
>tolerate childishness is not a company trustworthy to conduct business
>with.


Right.

So avoid conducting business with Ed's 'nospam.com' company.


--
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: 17 Jul 2000 19:20:03 GMT
From: abigail@delanet.com.bbs@openbazaar.net (Abigail)
Subject: Re: Bizarre BEGIN block problem
Message-Id: <3bRMY4$Tzj@openbazaar.net>

Ed Foy (ed@nospam.com) wrote on MMDVIII September MCMXCIII in
<URL:news:5mnb5.62962$_b3.1834587@newsread1.prod.itd.earthlink.net>:
$$
$$ I also have a hard and fast rule: never put private email addresses in
$$ newsgroups. This policy keeps the SPAM to a low roar so I spend much
$$ less time wading through junk mail and updating TWIT filters. It's
$$ called an ounce of prevention.

Strange. I've been using Usenet for over 12 years now, using a myriad
of addresses. The past year, I've posted from a handful of addresses,
which all get forwarded to the same mailbox.

Less than 1% of my incoming mail is spam.

Wading through posts of `twits' like you on Usenet take far much time.
If time is so precious for you, what on earth are you doing on Usenet?

$$ >Sticking with 5.004 is volunteering for support problems.
$$
$$ That is what my ISP provides. That is what I must use until they
$$ upgrade. For better or worse, the real world doesn't upgrade just
$$ because there is something newer available. "Newer" doesn't mean better,
$$ just a different set of bugs to contend with. Witness: everything
$$ Microsoft has produced from day one.


Writing CGI programs using an ISP which doesn't give you tech support is
"real world"? Come on, be realistic.



Abigail
--
print v74.117.115.116.32.97.110.111.116.104.101.114.
      v32.80.101.114.108.32.72.97.99.107.101.114.10;


------------------------------

Date: 17 Jul 2000 16:20:02 GMT
From: up2l8@my-deja.com.bbs@openbazaar.net ()
Subject: bless loses inheritance?
Message-Id: <3bRI12$Vvc@openbazaar.net>

Hello,

I am trying to reconsecrate an object into
a new class (I'm trying to make a copy constructor...)
but it seems that when I re-bless the object it loses
all of the inheritance information.  I found that when
I call a simple function like so:

sub ima {
  return(@ISA);
}

The inheritance info seems to be read correctly.

ex.

  bless $o, $to_class;
  print "PASS\n" if ($o->isa("Netlist::Element"));
  print "IMA- ".join("\n\t", $o->ima)."\n";
  print "PASS, but weird!\n" if ($o->isa("Netlist::Element"));

Oddly enough this always prints the weird string, even though
I really didn't DO anything!

Does anyone have any ideas on this???

Using perl5.004_04 built for sun4-solaris

Thanks,

Eric


Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

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 3708
**************************************


home help back first fref pref prev next nref lref last post