[17331] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 4753 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Oct 29 00:05:22 2000

Date: Sat, 28 Oct 2000 21:05:07 -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: <972792306-v9-i4753@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Sat, 28 Oct 2000     Volume: 9 Number: 4753

Today's topics:
    Re: apache webserver adn active perl question ?? <elephant@squirrelgroup.com>
    Re: Breaking a long word (Gwyn Judd)
    Re: does the CPAN shell work in win32? <elephant@squirrelgroup.com>
    Re: error using DBI, Dynaloader (Charles DeRykus)
    Re: grep vs. a subroutine to find an occurance of an el (Tom Christiansen)
    Re: grep vs. a subroutine to find an occurance of an el <harrisr@bignet.net>
    Re: grep vs. a subroutine to find an occurance of an el (Gwyn Judd)
    Re: grep vs. a subroutine to find an occurance of an el (Steven Smolinski)
    Re: grep vs. a subroutine to find an occurance of an el (Tad McClellan)
    Re: How to speedup the following <nospam@david-steuber.com>
        Keyboard IO? <rsm@loop.com>
    Re: OT: Yes there _are_ stupid questions.  Anyone colle (Steve)
    Re: OT: Yes there _are_ stupid questions.  Anyone colle (Randal L. Schwartz)
    Re: OT: Yes there _are_ stupid questions.  Anyone colle (Gwyn Judd)
    Re: Perl: ICQ Checker <nospam@david-steuber.com>
    Re: problem of perldoc command <elephant@squirrelgroup.com>
    Re: variable in module <pilsl@goldfisch.atat.at>
    Re: what does /warn "$x" if "$x"/ mean (Martien Verbruggen)
    Re: what does /warn "$x" if "$x"/ mean <josephmariadassou@primus.com.au>
    Re: what does /warn "$x" if "$x"/ mean (Martien Verbruggen)
    Re: Yes there _are_ stupid questions.  Anyone collect t <noem@i.l>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: Sun, 29 Oct 2000 15:42:17 +1100
From: jason <elephant@squirrelgroup.com>
Subject: Re: apache webserver adn active perl question ??
Message-Id: <MPG.146655b7250ac2e6989867@localhost>

Ad v Meersbergen wrote ..
>i just installed apache webserver and active perl (win32)
>
>when i want to run the script from my homepage i don't run muy script
>the script is place in de cgi-bin dir of my webserver folders.
>
>anyone got a clue how to make the cgi or perl scripts work with apache
>webserver and active perl
>installed on a win98 machine ??

taking a stab in the dark - I imagine that the information you require 
will be found in the FAQ section entitled "Web Server Config" in which a 
question entitled "How do I use ActivePerl under Apache?" is asked and 
answered

you will find a link to the documentation on your Windows98 Programs 
menu in a section entitled 'ActivePerl'

-- 
  jason -- elephant@squirrelgroup.com --


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

Date: Sun, 29 Oct 2000 01:46:59 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Breaking a long word
Message-Id: <slrn8vn0ch.vkh.tjla@thislove.dyndns.org>

I was shocked! How could Jimtaylor5 <jimtaylor5@aol.com>
say such a terrible thing:
>I was wondering if anyone could help me in finding a solutionin using perl to
>break a long URL off and print the remainder on another line or place it in
>another variable, as long URL's warp my printout. Say I have a URL in a
>variable 60 characters long, and I want to print that variable. How would I
>make sure maximum 40 characters get printed on one line, and the rest on
>another. I guess I'm asking how do I break a variable off at a certain number
>of characters, and yet retain that broken off to print on another line. Or if
>any of you guys would have a better way of doing it. Thanks guys in advance. 

I see some other people have suggested a couple of different methods but
I think this method is the simplest:

format STDOUT =
^<<<<<<<<<<<<<<<<<<
$blah
 .

$blah =
'http://www.blah.com/sjkdhcvb/sdc/sdc/sadca/sa/scsd/cs/acq/awq/da/wdas/cas/cas/csa/cas/csda/cads/csadc/sdacsadc.html';

$: = '/';

write while $blah;

(Thanks to Tom C for expanding my horizons).

See 'perldoc perlform' and 'perldoc -f write'

-- 
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
It usually takes more than three weeks to prepare a good impromptu speech.
-Mark Twain


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

Date: Sun, 29 Oct 2000 15:37:26 +1100
From: jason <elephant@squirrelgroup.com>
Subject: Re: does the CPAN shell work in win32?
Message-Id: <MPG.146654949cfd5c5c989866@localhost>

pintihar@my-deja.com wrote ..
>let me clarify a few things. I am starting with a fresh install of
>Activestate perl 5.6. I am using Cygwin and the configuration of
>"perl -MCPAN -e shell" completes without errors or warnings. When I try
>to "install Bundle::CPAN" I get this error:
>
>Subroutine new redefined at C:/Perl/site/lib/LWP\UserAgent.pm line 116,
><FIN> line 1.
>
>Does anyone have experiance with this method of accessing CPAN using
>ActiveState Perl?

yes - my Perl 5.6.0 on NT4 works perfectly well - including the 
situation you specifically mention above (except I don't have cygwin - 
but rather have installed other ports of various UNIX commands)

I received no such error when installing Bundle::CPAN

-- 
  jason -- elephant@squirrelgroup.com --


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

Date: Sun, 29 Oct 2000 02:59:26 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: error using DBI, Dynaloader
Message-Id: <G368B2.Lvr@news.boeing.com>

In article <39FA3604.14B88913@geocities.com>,
Pasquale  <pdmos23@geocities.com> wrote:
>I am getting the following error:
>DynaLoader object version 1.03 does not match $DynaLoader::VERSION 1.04
>at /dir/mydir/cgi-bin/DynaLoader.pm line 93.
>BEGIN failed--compilation aborted at /dir/mydir/cgi-bin/DBI.pm line 149.
>
>BEGIN failed--compilation aborted at exit.pl line 5.
>
>I looked at all the lines mentioned above, mainly the DynaLoader
>version, but I don't see what I can do.  Unless I manually change the
>version from 1.04 to 1.03, but I don't think that would be right.  I
>have included the lines of code from the list above.  I understand the
>bottom two errors, hierarchy thing.  Why is it having a problem with
>line 93 from the DynaLoader.pm??
>I have all the most recent versions of modules, DBI.pm-1.14, CGI.pm-2.74
>& DynaLoader-1.04.
>
>snippet from my exit.pl script:
>#!/usr/bin/perl -wT
>use strict;
>use lib "/dir/mydir/cgi-bin";
>use CGI::Carp qw(fatalsToBrowser);
>use DBI;   ### Line 5
>use CGI qw(:standard);
>

Remove your private copy of DynaLoader-1.04. Perl
wants to use its own earlier version.

hth,
--
Charles DeRykus


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

Date: 28 Oct 2000 19:14:41 -0700
From: tchrist@perl.com (Tom Christiansen)
Subject: Re: grep vs. a subroutine to find an occurance of an element in a list
Message-Id: <39fb7a01@cs.colorado.edu>

In article <ant2900089eefNdQ@oakseed.demon.co.uk>,
James Taylor  <james@demon.co.uk> wrote:
:The local *array = shift; line looks like magic to my untrained eye.
:Could you point me to a page in the Camel where I can read up on
:what's happening please. 

See p295.  There's a bit on p79, too.

>(Still don't have perldoc.)

I have no idea what that means.   Perl comes with manpages.  If you
don't have them trivially available, then you don't have a proper
installation and should immediately fire your system administrator
for gross negligence.

See "Pass by Reference" in perlsub(1) for most of this.

>In article <8tfeh001bb1@news2.newsguy.com>, Daniel Chetlin
><URL:mailto:daniel@chetlin.com> wrote:
>The my ($string, $array) = @_; line looks like $array would end up
>being a simple scalar containing the value of the second element of @_
>but then it is used as if it were a reference to an array. I assume
>this is yet more of the same kind of magic. Can I read up on it in the
>same place as the local *array = shift; incantation, or this subtly
>different in some way?

See p224.

--tom


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

Date: Sat, 28 Oct 2000 22:15:34 -0400
From: "Randy Harris" <harrisr@bignet.net>
Subject: Re: grep vs. a subroutine to find an occurance of an element in a list
Message-Id: <svn213tacaep81@corp.supernews.com>

Tom Christiansen <tchrist@perl.com> wrote in message
news:39fb7a01@cs.colorado.edu...
> In article <ant2900089eefNdQ@oakseed.demon.co.uk>,
> James Taylor  <james@demon.co.uk> wrote:
> :The local *array = shift; line looks like magic to my untrained eye.
> :Could you point me to a page in the Camel where I can read up on
> :what's happening please.
>
> See p295.  There's a bit on p79, too.
>
> >(Still don't have perldoc.)
>
> I have no idea what that means.   Perl comes with manpages.  If you
> don't have them trivially available, then you don't have a proper
> installation and should immediately fire your system administrator
> for gross negligence.

Now wait a darned minute, I resemble that remark.  I'm one of those
system administrators whose firing you are advocating.  I have lots of
systems that have the perl command processor but no perldoc and no Perl
manpages, because that is the way the OS comes from HP.  I'm not
suggesting these can't be added, but I think gross negligence is a bit
of an exaggeration.

Randy


>
> See "Pass by Reference" in perlsub(1) for most of this.
>
> >In article <8tfeh001bb1@news2.newsguy.com>, Daniel Chetlin
> ><URL:mailto:daniel@chetlin.com> wrote:
> >The my ($string, $array) = @_; line looks like $array would end up
> >being a simple scalar containing the value of the second element of
@_
> >but then it is used as if it were a reference to an array. I assume
> >this is yet more of the same kind of magic. Can I read up on it in
the
> >same place as the local *array = shift; incantation, or this subtly
> >different in some way?
>
> See p224.
>
> --tom




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

Date: Sun, 29 Oct 2000 02:18:30 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: grep vs. a subroutine to find an occurance of an element in a list
Message-Id: <slrn8vn27j.vkh.tjla@thislove.dyndns.org>

I was shocked! How could Gwyn Judd <tjla@guvfybir.qlaqaf.bet>
say such a terrible thing:

>What I did was I took your version and changed them so that they all
>used '==' in the comparison. I then ran them with several different
>types of input:

Of course, if all you are doing si comparing with '==' or 'eq' it would
almost certainly be far more efficient to use a hash.

-- 
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)

"What's a knockout like you doing in a computer-generated gin-joint like
this?"

        -- Riker to Minuet in ST:TNG "11001001"


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

Date: Sun, 29 Oct 2000 03:31:05 GMT
From: sjs@yorku.ca (Steven Smolinski)
Subject: Re: grep vs. a subroutine to find an occurance of an element in a list
Message-Id: <slrn8vn6q0.ib.sjs@ragnar.sympatico.ca>

Randy Harris <harrisr@bignet.net> wrote:
> Tom Christiansen <tchrist@perl.com> wrote in message
> news:39fb7a01@cs.colorado.edu...

> > [...]                             Perl comes with manpages.  If you
> > don't have them trivially available, then you don't have a proper
> > installation and should immediately fire your system administrator
> > for gross negligence.
> 
> Now wait a darned minute, I resemble that remark.  I'm one of those
> system administrators whose firing you are advocating.  I have lots of
> systems that have the perl command processor but no perldoc and no Perl
> manpages, because that is the way the OS comes from HP.  I'm not
> suggesting these can't be added, but I think gross negligence is a bit
> of an exaggeration.

If it's a vanilla HP install, it may very well have a carcass of a camel
(version 4) rather than a live, breathing one.

I think in that case you keep your job; we ought to start sacking people 
at HP who think it's funny to package a buggy, eight year-old version of
software that they can acquire for free.

Come to think of it, my latest AIX machine had a ksh that wasn't even
ksh '93 compliant...

Steve


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

Date: Sat, 28 Oct 2000 21:54:23 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: grep vs. a subroutine to find an occurance of an element in a list
Message-Id: <slrn8vn0qf.ncv.tadmc@magna.metronet.com>

On Sat, 28 Oct 2000 22:15:34 -0400, Randy Harris <harrisr@bignet.net> wrote:
>Tom Christiansen <tchrist@perl.com> wrote in message
>news:39fb7a01@cs.colorado.edu...
>> In article <ant2900089eefNdQ@oakseed.demon.co.uk>,
>> James Taylor  <james@demon.co.uk> wrote:

[ snip quoted text not commented on ]

>> See p295.  There's a bit on p79, too.
>>
>> >(Still don't have perldoc.)
>>
>> I have no idea what that means.   Perl comes with manpages.  If you
>> don't have them trivially available, then you don't have a proper
>> installation and should immediately fire your system administrator
>> for gross negligence.
>
>Now wait a darned minute, I resemble that remark.  I'm one of those
>system administrators whose firing you are advocating.  


Why? Did you install an incomplete perl? (doesn't sound like it)

The docs install by default. To get perl installed without
its docs requires explicit action. Somebody somewhere
_did something_ to cause the docs to not be there.

Come to think of it, that does NOT sound like "negligence".
That has passive connotations, and there was some active
foolishness at play here.


>I have lots of
>systems that have the perl command processor but no perldoc and no Perl
>manpages, because that is the way the OS comes from HP.  


Sounds like someone at HP should be fired though.

I'm not a SA, but if I administered HP machines, I would by now
be giving serious consideration wiping out the provided perl
and reinstalling a complete one.

I do this as a matter of routine when I upgrade my Linux OS.

Perl is too important to me to leave the important decisions
up so somebody else. (particularly after having discovered
such a strange decision as withholding a program's documentation.)


>I'm not
>suggesting these can't be added, but I think gross negligence is a bit
>of an exaggeration.


It is clearly gross negligence, _who's_ negligence seems
a bit murky though  :-)



[ snip yet more quoted text not commented on ]

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


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

Date: Sun, 29 Oct 2000 01:07:40 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: How to speedup the following
Message-Id: <m3bsw4xxnn.fsf@solo.david-steuber.com>

Once, when I needed to parse very large weblog files (>10MB), I found
regexes to be too slow.  At least the way I used them.  I ended up
using index and substring in a very C like way to speed up the
program.

I don't know if this is at all helpful or not.

-- 
David Steuber | Perl apprentice.  The axe did not stop the
NRA Member    | mops and buckets from flooding my home.
ICQ# 91465842
***         http://www.david-steuber.com/          ***


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

Date: Sat, 28 Oct 2000 20:55:35 -0700
From: Bob Margulies <rsm@loop.com>
Subject: Keyboard IO?
Message-Id: <39FB9FB7.9D91BD59@loop.com>

I have searched as many FAQs as I could find, but no simple answer comes
up. I am running perl from (don't laugh) DOS on a PC. What I want to do
is issue a prompt for input, read a line of text from the keyboard,
terminate it with "Enter", and then proceed to do something with the
input. 

I can do that in a bunch of other languages, but perl has me stumped.
AFAK, there's nothing in the Camel or Llama books. Am I wrong? Why is it
so mysterious? And most of all, how do I do it?


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

Date: 29 Oct 2000 03:10:28 GMT
From: steve@zeropps.uklinux.net (Steve)
Subject: Re: OT: Yes there _are_ stupid questions.  Anyone collect them?
Message-Id: <slrn8vn1k3.29v.steve@zero-pps.localdomain>

On Sun, 29 Oct 2000 01:02:23 GMT, David Steuber wrote:
>If this is a FAQ, I haven't found it.  Has anyone collected really
>stupid questions?  By stupid, I don't mean, "how do I substitute foo
>for bar?"  I mean questions where people ask how to do ethically
>questionable things.
>
>eg.  How do I write a Perl script to grab the daily Dilbert cartoons
>that I can run from a cron job so that I don't have to visit the site
>and see all the ads? (A trivial script to write ;-)

I've been asked about that, but they didn't want the machine to actually
go online (due to the internet being a secrity risk). 

-- 
Cheers
Steve              email mailto:steve@zeropps.uklinux.net

%HAV-A-NICEDAY Error not enough coffee  0 pps. 

web http://www.zeropps.uklinux.net/

or  http://start.at/zero-pps

  1:59am  up 18 days,  4:20,  3 users,  load average: 1.35, 1.21, 1.17


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

Date: 28 Oct 2000 19:14:15 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: OT: Yes there _are_ stupid questions.  Anyone collect them?
Message-Id: <m1lmv8cs20.fsf@halfdome.holdit.com>

>>>>> "David" == David Steuber <nospam@david-steuber.com> writes:

David> eg.  How do I write a Perl script to grab the daily Dilbert cartoons
David> that I can run from a cron job so that I don't have to visit the site
David> and see all the ads? (A trivial script to write ;-)

See Image::Grab in the CPAN for a generic solution, or look at
<http://www.stonehenge.com/merlyn/WebTechniques/col15.html> for a
pretty specific one (although the URLs there have been left as
originally published, and it'll take a tiny bit of work to get the
real URLs).

And remove the despamming from your email address. Sheesh.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!


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

Date: Sun, 29 Oct 2000 02:22:59 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: OT: Yes there _are_ stupid questions.  Anyone collect them?
Message-Id: <slrn8vn2g1.vkh.tjla@thislove.dyndns.org>

I was shocked! How could David Steuber <nospam@david-steuber.com>
say such a terrible thing:
>If this is a FAQ, I haven't found it.  Has anyone collected really
>stupid questions?  By stupid, I don't mean, "how do I substitute foo
>for bar?"  I mean questions where people ask how to do ethically
>questionable things.
>
>eg.  How do I write a Perl script to grab the daily Dilbert cartoons
>that I can run from a cron job so that I don't have to visit the site
>and see all the ads? (A trivial script to write ;-)

How is that ethically questionable? I *do* that from a cronjob and have
it mail me the cartoons every day because I can't stand waiting for the
page to load. If they only want people to read the pages online I'm sure
there are ways of making people do so. Last time I looked I'm sure I
didn't see any notice saying 'You can only look at these cartoons
through a web-browser such as netscape or explorer'.

-- 
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
An ounce of image is worth a pound of performance.


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

Date: Sun, 29 Oct 2000 01:13:53 GMT
From: David Steuber <nospam@david-steuber.com>
Subject: Re: Perl: ICQ Checker
Message-Id: <m37l6sxxda.fsf@solo.david-steuber.com>

fallenang3l@my-deja.com writes:

' But why do you want such a thing when ICQ has its own tool for it? The
' addy to it is http://www.icq.com/features/web/indicator.html.

I'm not accusing the original poster of anything.  But I have actually
received spam instant messages (for lack of a better word for 'em).
Often they are the URL variety which would send your browser to a
website with the Windows version of the program.

I think MICQ could probably be driven to do something like this from a
script.  Since the source is available, one could even use it as a
basis for a Perl module to perform such evil deeds.

-- 
David Steuber | Perl apprentice.  The axe did not stop the
NRA Member    | mops and buckets from flooding my home.
ICQ# 91465842
***         http://www.david-steuber.com/          ***


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

Date: Sun, 29 Oct 2000 15:46:57 +1100
From: jason <elephant@squirrelgroup.com>
Subject: Re: problem of perldoc command
Message-Id: <MPG.146656c99be8144b989868@localhost>

­»΄δΈ} wrote ..
>while i entered "perldoc perldoc"and expect a description,i got this message
>instead
>"invalid command.com"
>"enter correct name of command interpreter"
>why is this happening?it works fine before....

when was 'before' ?? .. sounds like your Windows command interpreter is 
broken

-- 
  jason -- elephant@squirrelgroup.com --


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

Date: Sun, 29 Oct 2000 01:36:24 GMT
From: peter pilsl <pilsl@goldfisch.atat.at>
Subject: Re: variable in module
Message-Id: <MPG.14659e4cfa43fed7989900@news.chello.at>

In article <slrn8vmt22.ac5.mgjv@martien.heliotrope.home>, 
mgjv@tradingpost.com.au says...

<skip>
> 
> The easiest to solve is the question why it prints 88: You get two
> prints of 8 each. Only the second one adds a newline.
>

shame on me ! but I work on this problem for many hours now and missed the 
debuging-print in sub a1 when running this script for the 1000. time ...
 
> 
> sub a1 { eval '$s++'; warn $@ if $@ }
> sub a2 { eval {$s++}; warn $@ if $@ }
>

Unfortunately I cant use the {..}-notation on my problem, cause I read and 
parse from a configfile, so its more like this:
sub a1 {my $line='$s=8;'; eval $line; warn $@ if $@;}

Writing 'eval{$line}' here dosnt solve my problem and I get a warning too:
$> ~/bin/test.pl 
Useless use of private variable in void context at /tmp/pack.pl line 9.
7

It seems I am doomed. I dont want to use 'our' instead of 'my' do prevent 
the packageuser from doing ugly things and I cant add dummy-statements 
like '$s;' or '$s=$s;' in the sub, cause I dont know which variables will 
appear to evaluate and calling the variable a second time inside an eval-
block again of course wont help :-(

> 
> I'd say there is something wrong with the choices that are being made
> about which variable gets to be seen as in scope here. I don't know
> which $s is used in the first sub a1, but I suspect it's a localised
> copy of the package variable $pack::s. It doesn't modify $pack::s or
> $::s, so it's not that. This behaviour is certainly not according to
> the documentation on eval. I'd say the behaviour is wrong, but it
> wouldn't be the first time I've trusted the documentation too much. In
> reality, the documentation carries not a lot of weight in determining
> what's correct behaviour. 
>
> Unless one of the people with knowledge of Perl internals says
> otherwise, I'd probably prepare a bug report. Either the behaviour is
> wrong, or the documentation. They should be synchronised.
> 

However, if the documentation is wrong, it seems that there is no direct 
way to achieve my goal. I cant believe that at all. Maybe someone knows a 
trick how to ship around this bug/feature.

Thanks a lot to Martien for your prompt and detailed help.

peter

-- 
pilsl@
goldfisch.at


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

Date: Sun, 29 Oct 2000 11:56:00 +1100
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: what does /warn "$x" if "$x"/ mean
Message-Id: <slrn8vmtcv.ac5.mgjv@martien.heliotrope.home>

On Sun, 29 Oct 2000 11:38:28 +1100,
	Joseph Chakrvarti <josephmariadassou@primus.com.au> wrote:
> Obviuosly if I I had written the whole program I would know what I am doing.

Let me just quote from your original post:

> > > Here is a short perl script(?) I wrote to split images and it works:
                                     ^^^^^^^
You should probably just have said something like: Here's a program I
adapted from the docuemntation of Image::magick. It uses constructs I
copied that I don't understand.

It really pays off to be as precise as possible when you are dealing
with programmers. Programmers need to be professional pedants. You can't
afford to be imprecise when you are a programmer. When you are, you
detract meaning from what you are saying. Pedants, like me, will focus
on that. And, like I said, many programmers are pedants.

When we say that 'I wrote' something, we do mean that we did that. We
don't mean copied bits and pieces and stuck them together. That isn't
writing a program. It's sticking pieces together. The verb 'to write'
among programmers means more than cut'n'paste.

Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | Think of the average person. Half of
Commercial Dynamics Pty. Ltd.   | the people out there are dumber.
NSW, Australia                  | 


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

Date: Sun, 29 Oct 2000 13:34:34 +1100
From: "Joseph Chakrvarti" <josephmariadassou@primus.com.au>
Subject: Re: what does /warn "$x" if "$x"/ mean
Message-Id: <39fb8cdb@news.iprimus.com.au>

Dear Mr Pedant
You are perhaps the only one in the whole wide world that does not pinch
code from books and software documentation. When I say I wrote, I meant I
take responsiblilty for it, not credit. If I have to mention every person
who should be credited for making the program work I'll have a long list,
starting with Bill Gates.
Thanks for your kind advice. I'll ask you more when I need it
joe

"Martien Verbruggen" <mgjv@tradingpost.com.au> wrote in message
news:slrn8vmtcv.ac5.mgjv@martien.heliotrope.home...
> On Sun, 29 Oct 2000 11:38:28 +1100,
> Joseph Chakrvarti <josephmariadassou@primus.com.au> wrote:
> > Obviuosly if I I had written the whole program I would know what I am
doing.
>
> Let me just quote from your original post:
>
> > > > Here is a short perl script(?) I wrote to split images and it works:
>                                      ^^^^^^^
> You should probably just have said something like: Here's a program I
> adapted from the docuemntation of Image::magick. It uses constructs I
> copied that I don't understand.
>
> It really pays off to be as precise as possible when you are dealing
> with programmers. Programmers need to be professional pedants. You can't
> afford to be imprecise when you are a programmer. When you are, you
> detract meaning from what you are saying. Pedants, like me, will focus
> on that. And, like I said, many programmers are pedants.
>
> When we say that 'I wrote' something, we do mean that we did that. We
> don't mean copied bits and pieces and stuck them together. That isn't
> writing a program. It's sticking pieces together. The verb 'to write'
> among programmers means more than cut'n'paste.
>
> Martien
> --
> Martien Verbruggen              |
> Interactive Media Division      | Think of the average person. Half of
> Commercial Dynamics Pty. Ltd.   | the people out there are dumber.
> NSW, Australia                  |




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

Date: Sun, 29 Oct 2000 14:09:21 +1100
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: what does /warn "$x" if "$x"/ mean
Message-Id: <slrn8vn571.ac5.mgjv@martien.heliotrope.home>

On Sun, 29 Oct 2000 13:34:34 +1100,
	Joseph Chakrvarti <josephmariadassou@primus.com.au> wrote:
> Dear Mr Pedant
> You are perhaps the only one in the whole wide world that does not pinch
> code from books and software documentation. When I say I wrote, I meant I

*shrug*

You can take this sort of advice any way you want to take it. But be
prepared to deal with this sort of stuff each time you're not precise
enough. Because...

> Thanks for your kind advice. I'll ask you more when I need it

You can't stop pedants from giving advice.

BTW, please, in the future, post your replies _after_ the suitably
trimmed text you reply to. It makes the threads easier to follow, and is
the commonly accepted quoting style on this group, and Usenet in
general.

Thanks,
Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | Useful Statistic: 75% of the people
Commercial Dynamics Pty. Ltd.   | make up 3/4 of the population.
NSW, Australia                  | 


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

Date: Sun, 29 Oct 2000 02:38:15 GMT
From: "Graham W. Boyes" <noem@i.l>
Subject: Re: Yes there _are_ stupid questions.  Anyone collect them?
Message-Id: <01c04150$8d51a0a0$4e3c7318@cr989306-a.crdva1.bc.wave.home.com>

Even I did that!  It took no time at all...in fact, most of the comics from
United Feature Syndicate are at http://www.toao.net/comics.pl

It does, however, take a #@$% of a long time to process (about 35 seconds
or so, depending on the time of day I've found) and some of the images are
broken.  That's my fault.

Graham W. Boyes


> eg.  How do I write a Perl script to grab the daily Dilbert cartoons
> that I can run from a cron job so that I don't have to visit the site
> and see all the ads? (A trivial script to write ;-)



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

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


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