[17676] in Perl-Users-Digest
Perl-Users Digest, Issue: 5096 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Dec 13 00:05:37 2000
Date: Tue, 12 Dec 2000 21:05:12 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <976683911-v9-i5096@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 12 Dec 2000 Volume: 9 Number: 5096
Today's topics:
Re: DBI prepare method <zarathustra@enviroweb.org>
Re: DBI::mySQL query <james@bitperfect.com>
Re: DBI::mySQL query <jeff@vpservices.com>
easy question <ng@fnmail.com>
Re: easy question <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Re: easy question <ng@fnmail.com>
Re: easy question (Richard Zilavec)
Re: Faster than LWP (BUCK NAKED1)
Re: make a call to ReadParse?? (Richard Zilavec)
Modifying a string if an expression is false <jsullivan@eosinc.com>
Re: multiple recipients using Net::SMTP (Chris Fedde)
Re: Need help to replace passwd - New at this ! msalerno@my-deja.com
Re: ON - INTERNET TELE COMMUTE ONLY - PERL - Java - Js (Maggert)
Perl DBI <syvinski@ameritech.net>
PERL INternet functions <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Re: PERL INternet functions <tony_curtis32@yahoo.com>
Re: PERL INternet functions <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Re: PERL INternet functions <tony_curtis32@yahoo.com>
Re: PERL INternet functions <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Re: Posting Guidelines for comp.lang.perl.misc ($Revisi (Martien Verbruggen)
Re: Posting Guidelines for comp.lang.perl.misc ($Revisi (Tad McClellan)
Re: Posting Guidelines for comp.lang.perl.misc ($Revisi (Tad McClellan)
Re: Posting Guidelines for comp.lang.perl.misc ($Revisi (Tad McClellan)
Re: Posting Guidelines for comp.lang.perl.misc ($Revisi (Tad McClellan)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 13 Dec 2000 02:26:16 GMT
From: "Zarathustra" <zarathustra@enviroweb.org>
Subject: Re: DBI prepare method
Message-Id: <c7BZ5.64459$II2.5847061@newsread2.prod.itd.earthlink.net>
"Jorge Godoy" <godoy@conectiva.com> wrote in message
news:kpsnnt9lmp.fsf@dagon.conectiva...
> You should try $dbh->do("SELECT ...."); for your SELECT. I don't know
> if it will work.
It may "work" but it won't return the data since do() is for non-select
statements. selectall_arrayref() or selectrow_array() would be the methods
to call if you want to return the data and combine prepare(), execute(), and
fetching.
------------------------------
Date: Tue, 12 Dec 2000 21:14:19 -0800
From: James Tolley <james@bitperfect.com>
Subject: Re: DBI::mySQL query
Message-Id: <3A3705AB.4B24691B@idt.net>
> When
> wouldn't you want that to be undef?
My understanding is:
When you want to change the already-defined behavior:
# define how you want errors to be handled during the connect() call:
my $dbh = DBI->connect(
"dbi:mysql:db_name:machine",
"un",
"pw",
{ RaiseError => 1 } # <-- setting the behavior here.
);
# do some stuff where it's good to die on error:
# ...
# THEN: do something which isn't all that important...
$dbh->do(
qq[ INSERT INTO unimportant (stuff) VALUES (?) ],
{ RaiseError => 0 }, # <-- "don't die() on error!"
$bind_var
);
$dbh->disconnect;
__END__
hth,
James
------------------------------
Date: Tue, 12 Dec 2000 19:32:56 -0800
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: DBI::mySQL query
Message-Id: <3A36EDE8.F451B527@vpservices.com>
James Tolley wrote:
>
> > When
> > wouldn't you want that to be undef?
>
> My understanding is:
>
> When you want to change the already-defined behavior:
>
> # define how you want errors to be handled during the connect() call:
> my $dbh = DBI->connect(
> "dbi:mysql:db_name:machine",
> "un",
> "pw",
> { RaiseError => 1 } # <-- setting the behavior here.
> );
> # do some stuff where it's good to die on error:
> # ...
No, I don't think that works. Try this. It printed the first die
message but not the second for me, indicating that setting RaiseError
can not be done with that parameter to do().
use DBI;
my $dbh = DBI->connect('dbi:mysql:test');
$dbh->do(
qq[ Some bad SQL ],
{ RaiseError => 1 }, (3,4,5)
);
print "\n\nDidn't die after first test!\n\n";
$dbh->{RaiseError} = 1;
$dbh->do(
qq[ Some bad SQL ],
undef, (3,4,5)
);
print "\n\nDidn't die after second test!\n\n";
$dbh->disconnect;
--
Jeff
------------------------------
Date: Tue, 12 Dec 2000 21:21:47 -0600
From: "Enrico Ng" <ng@fnmail.com>
Subject: easy question
Message-Id: <916q0e$5l2$1@info1.fnal.gov>
This is probably a very easy question, but I have never done this before.
I am making a webpage for a small TV station.
it would have a place you can vote about certain shows.
and another place that shows what is showing now, and what will be on the
next three hours.
I was hopeing to use a SSI exec directive so I could split it up into a vote
script and a schedule script.
The server I am using prohibits SSI exec use, other SSI is ok although.
so I figure I will need to make a script that takes certain arguments for
loading pages.
so I can add the vote thing on each page and generate the schedule.
MY QUESTION IS:
is there an easy way I can do this?
ie. have a script called schedule.pl that generates a schedule depending on
what time it is.
then have my load.pl script that loads a page and adds that in.
can I "call" a perl script from within a perl script?
thanx
--
Enrico Ng <ng@fnmail.com>
------------------------------
Date: Wed, 13 Dec 2000 03:51:21 GMT
From: "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Subject: Re: easy question
Message-Id: <ZmCZ5.35955$w35.6616407@news1.rdc1.nj.home.com>
Just a thought about the voting---
I would make a scalar a percent. Then using a 1x1 graphic, stretch it out to
represent a graph. I thought of this when I woke up this morning...not sure
how it will work though.
print '<IMG SRC="1PIXEL.gif" width="$SCALAR" height="10">';
print '<IMG SRC="SCALE.gif" width="100">';
"Enrico Ng" <ng@fnmail.com> wrote in message
news:916q0e$5l2$1@info1.fnal.gov...
> This is probably a very easy question, but I have never done this before.
> I am making a webpage for a small TV station.
> it would have a place you can vote about certain shows.
> and another place that shows what is showing now, and what will be on the
> next three hours.
> I was hopeing to use a SSI exec directive so I could split it up into a
vote
> script and a schedule script.
> The server I am using prohibits SSI exec use, other SSI is ok although.
>
> so I figure I will need to make a script that takes certain arguments for
> loading pages.
> so I can add the vote thing on each page and generate the schedule.
>
> MY QUESTION IS:
> is there an easy way I can do this?
> ie. have a script called schedule.pl that generates a schedule depending
on
> what time it is.
> then have my load.pl script that loads a page and adds that in.
> can I "call" a perl script from within a perl script?
>
> thanx
>
> --
> Enrico Ng <ng@fnmail.com>
>
>
------------------------------
Date: Tue, 12 Dec 2000 22:30:58 -0600
From: "Enrico Ng" <ng@fnmail.com>
Subject: Re: easy question
Message-Id: <916u25$7hu$1@info1.fnal.gov>
yeah I've done that before when I made a "millionaire" game.
does anyone have any idea about my other question
> > This is probably a very easy question, but I have never done this
before.
> > I am making a webpage for a small TV station.
> > it would have a place you can vote about certain shows.
> > and another place that shows what is showing now, and what will be on
the
> > next three hours.
> > I was hopeing to use a SSI exec directive so I could split it up into a
> vote
> > script and a schedule script.
> > The server I am using prohibits SSI exec use, other SSI is ok although.
> >
> > so I figure I will need to make a script that takes certain arguments
for
> > loading pages.
> > so I can add the vote thing on each page and generate the schedule.
> >
> > MY QUESTION IS:
> > is there an easy way I can do this?
> > ie. have a script called schedule.pl that generates a schedule depending
> on
> > what time it is.
> > then have my load.pl script that loads a page and adds that in.
> > can I "call" a perl script from within a perl script?
--
Enrico Ng <ng@fnmail.com>
"EnIgMaBoM"
<enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
wrote in message news:ZmCZ5.35955$w35.6616407@news1.rdc1.nj.home.com...
> Just a thought about the voting---
>
> I would make a scalar a percent. Then using a 1x1 graphic, stretch it out
to
> represent a graph. I thought of this when I woke up this morning...not
sure
> how it will work though.
>
> print '<IMG SRC="1PIXEL.gif" width="$SCALAR" height="10">';
> print '<IMG SRC="SCALE.gif" width="100">';
>
------------------------------
Date: Wed, 13 Dec 2000 05:18:58 GMT
From: rzilavec@tcn.net (Richard Zilavec)
Subject: Re: easy question
Message-Id: <3a37066c.437492293@news.tcn.net>
On Wed, 13 Dec 2000 03:51:21 GMT, "EnIgMaBoM"
<enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
wrote:
>
>print '<IMG SRC="1PIXEL.gif" width="$SCALAR" height="10">';
^^^
This would have to be a double quote
print qq{<IMG SRC="1PIXEL.gif" width="$SCALAR" height="10">};
I have done the same thing on other websites, it works quite well.
--
Richard Zilavec
rzilavec@tcn.net
------------------------------
Date: Tue, 12 Dec 2000 20:48:59 -0600 (CST)
From: dennis100@webtv.net (BUCK NAKED1)
Subject: Re: Faster than LWP
Message-Id: <28424-3A36E39B-22@storefull-247.iap.bryant.webtv.net>
I downloadeded HTTP::GHTTP. Then I downloaded Gnome libghttp which was
975 KB, unzipped. I noticed that it needed compilation which I'm unable
to do on my unix Apache webserver. Sounds good though, but I also need
to be able to grab ftp files, in addition to HTTP, and store them.
I'm trying to get either David or Eli's suggestions to work, but still
haven't been successful with either one.
I wish I knew some plain ole perl codes that would accomplish the
grabbing of a URL. I'm so tired of installing module after module to try
and accomplish a simple task... <sigh> In my opinion, grabbing a URL is
basic, and should be an easy code that's in the regular distribution of
Perl. IOW, it should be as easy to grab a URL as it is a filehandle.
Thanks for all of your input,
Dennis
------------------------------
Date: Wed, 13 Dec 2000 05:13:33 GMT
From: rzilavec@tcn.net (Richard Zilavec)
Subject: Re: make a call to ReadParse??
Message-Id: <3a370400.436871545@news.tcn.net>
On Wed, 13 Dec 2000 00:42:41 GMT, manon_bertolini@mantacorp.com wrote:
>I am trying an Upload file sample and they say to make a call to
>ReadParse?? Can anyone help me out with a link or where this call is
>made from? And what this means?
You would require the cgi-lib.pl
require "cgi-lib.pl";
print &PrintHeader();
print <<EOF;
<html>
</body>
EOF
# Catch the submitted form
&ReadParse();
# Display the results
for(keys %in) {
print "$_ -> $in{$_}<br>\n";
}
print <<EOF;
</body>
</html>
EOF
You should really be reading up on CGI.pm though.
perldoc CGI
--
Richard Zilavec
rzilavec@tcn.net
------------------------------
Date: Tue, 12 Dec 2000 21:06:38 -0600
From: Jamie Sullivan <jsullivan@eosinc.com>
Subject: Modifying a string if an expression is false
Message-Id: <60od3t80an05pvj2een8eukdi9ci701fsa@4ax.com>
Hello,
I am attempting to create a script to modify the httpd.conf file to
add a certain string if not already present in the file. I am having
trouble trying to insert a check into the script to confirm that the
string "www.$var1" does not already exist. The variable I am passing
are the domain name and the folder name. Here is where I am so far,
any assistance is greatly appreciated:
#!/usr/bin/perl
open(INFILE, "$ARGV[0]");
$infile = <INFILE>;
($var1,$var2) = split(/\|/, $infile);
close(INFILE);
@ARGV = "/etc/httpd.conf";
$^I = ".bak";
while (<>) {
s(<begin_host_insertion>) (<VirtualHost www.$var1>\nServerName
www.$var1\nDocumentRoot
/www/$var2/web\n</VirtualHost>\n\n<begin_host_insertion>);
print;
}
------------------------------
Date: Wed, 13 Dec 2000 02:34:15 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: multiple recipients using Net::SMTP
Message-Id: <HeBZ5.201$B9.170583552@news.frii.net>
In article <3A36C6AC.F6D49B6F@spamcop.net>, Deb <kandeb@spamcop.net> wrote:
>
>For the life of me, I know I had this working with multiple
>recipients in the past, but it eludes me as to what I am
>now doing wrong.
>
[...]
>$smtp->to('moi'); # recipient's address
$smtp->to may be called multiple times.
Good luck
chris
--
This space intentionally left blank
------------------------------
Date: Wed, 13 Dec 2000 03:49:02 GMT
From: msalerno@my-deja.com
Subject: Re: Need help to replace passwd - New at this !
Message-Id: <916rje$mqe$1@nnrp1.deja.com>
In article <976660194.647589@elaine.furryape.com>,
gorilla@elaine.furryape.com (Alan Barclay) wrote:
> In article <913ffc$uha$1@nnrp1.deja.com>, <msalerno@my-deja.com>
wrote:
> >I am working on a script that will allow me to change the password
of a
> >user. Here is the problem, I cannot use the passwd command. I need
to
> >edit the /etc/passwd file. What I am looking to do is to change the
> >password for a particular user. I do not need to encrypt the
password
> >since I will be using a default pre-encrypted password.
>
> Stop.
>
> You do not have the necessary skills to know the security
implications of
> your program.
>
> Read lots of books, webpages etc, on security. In particular, read the
> archives of the Risk Digest about the dangers of default passwords.
>
> Then redesign your process to reflect what you've learned.
>
I appreciate your concern. I may be a novice when it comes to perl
scripts, but I completely understand what I am doing. I have been
administering Unix/Nt systems for more than 5 years now and I am
confident that this is what I want to do.
Thanks,
Matt
Sent via Deja.com
http://www.deja.com/
------------------------------
Date: Wed, 13 Dec 2000 03:07:36 GMT
From: mag@ionet.net (Maggert)
Subject: Re: ON - INTERNET TELE COMMUTE ONLY - PERL - Java - Js - css - html - DreamWeaver
Message-Id: <3a36e565.160300419@news.ionet.net>
On 12 Dec 2000 21:49:32 GMT, kevin metcalf
<xzrgpnys@yvtugubhfrovm.pbz> wrote:
>Unbelievably, Telecommuter@Visto.com wrote:
>> ***** ON A SCALE FROM 1 - 10 PERL must be 10 *****
>> ***** ON A SCALE FROM 1 - 10 NT4.0 ISS SERVER = 10 ***
>> $15.00 to $25.00 per hour commensurate with experience.
>
>Is it just me or is this person suffering from a sever lack of the
>reality gene?
The reason this guy is always advertising for this position is
because he hires people, works them for awhile and then never pays
them. According to him, he gets a lot of Russian programmers.
Yes I was an idiot that fell for it because I needed the
money. My skills are good enough but I'm in the army right now so I
don't have the option of getting just any job.
His site is also just a huge mistake in progress. Its
extremely bandwidth intensive and the only thing I saw that was good
was a cnn video news feed. He's still using an avatar chat program
too. I thought those went out like three years ago.
Oh, and all the scripts I saw on his site were sphagetti coded
and relied on cgi-lib.pl with no database, and he expects this site to
be able to get millions of hits.
------------------------------
Date: Tue, 12 Dec 2000 23:26:56 -0500
From: "Wayne M. Syvinski" <syvinski@ameritech.net>
Subject: Perl DBI
Message-Id: <UYCZ5.21$ce4.16651@nntp0.chicago.il.ameritech.net>
Is there a way using the Perl DBI to manipulate data on a record-by-record
basis (like DAO or ADO in the Visual Basic world), or am I stuck using SQL
only to manipulate data?
Thanks,
Wayne Syvinski
syvinski@ameritech.net
------------------------------
Date: Wed, 13 Dec 2000 02:38:36 GMT
From: "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Subject: PERL INternet functions
Message-Id: <MiBZ5.35886$w35.6580727@news1.rdc1.nj.home.com>
here is something I was trying to conder up, but hasnt been working well, it
says that there is something undefined, give it a run yourself, you'll see.
#!/usr/lib/perl
use strict;
my($host,$ip);
$host="http://whoredware.com";
$ip = join(".",unpack("C4",scalar gethostbyname($host)));
print " The ip resolves to $ip\n\n";
any help would be appreciated,
Joshua ziering
------------------------------
Date: 12 Dec 2000 20:47:20 -0600
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: PERL INternet functions
Message-Id: <87lmtlf35z.fsf@limey.hpcc.uh.edu>
>> On Wed, 13 Dec 2000 02:38:36 GMT,
>> "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com> said:
> here is something I was trying to conder up, but hasnt
conjure?
> been working well, it says that there is something
> undefined, give it a run yourself, you'll see.
> #!/usr/lib/perl
no -w flag...
> use strict;
but semi-redeemed :-)
> my($host,$ip);
> $host="http://whoredware.com";
^^^^^^^^^^^^^^^^^^^^^^
That's a (textual representation of a) URL, not a hostname.
You can use the URI module to extract the relevant part,
viz.
use URI;
my $where = new URI "http://whoredware.com/";
my $host = $where->host;
"perldoc URI" for more info...
hth
t
--
Eih bennek, eih blavek.
------------------------------
Date: Wed, 13 Dec 2000 03:45:48 GMT
From: "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Subject: Re: PERL INternet functions
Message-Id: <MhCZ5.35950$w35.6612983@news1.rdc1.nj.home.com>
My apologies for sending email to people who I reply to, This mail program
is FOOBAR. <Snarls and curses MS> anyhow, say I wanted to work in a Scalar
where the URI is, My attempts to do this failed miserably.
Josh
"Tony Curtis" <tony_curtis32@yahoo.com> wrote in message
news:87lmtlf35z.fsf@limey.hpcc.uh.edu...
> >> On Wed, 13 Dec 2000 02:38:36 GMT,
> >> "EnIgMaBoM"
<enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
said:
>
> > here is something I was trying to conder up, but hasnt
> conjure?
>
> > been working well, it says that there is something
> > undefined, give it a run yourself, you'll see.
>
> > #!/usr/lib/perl
>
> no -w flag...
>
> > use strict;
>
> but semi-redeemed :-)
>
> > my($host,$ip);
> > $host="http://whoredware.com";
> ^^^^^^^^^^^^^^^^^^^^^^
> That's a (textual representation of a) URL, not a hostname.
>
> You can use the URI module to extract the relevant part,
> viz.
>
> use URI;
> my $where = new URI "http://whoredware.com/";
> my $host = $where->host;
>
> "perldoc URI" for more info...
>
> hth
> t
> --
> Eih bennek, eih blavek.
------------------------------
Date: 12 Dec 2000 21:52:51 -0600
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: PERL INternet functions
Message-Id: <87itopf04s.fsf@limey.hpcc.uh.edu>
[ please quote the original text, *then* add your new text ]
>> On Wed, 13 Dec 2000 03:45:48 GMT,
>> "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com> said:
> anyhow, say I wanted to work in a Scalar where the URI
> is, My attempts to do this failed miserably.
You mean?
my $location = 'http://www.some.where/';
my $uri = new URI $location;
But that seems too trivial to cause a conceptual problem.
"My attempts to do this" doesn't help track down the
problem unless you show everyone what you tried.
hth
t
--
Eih bennek, eih blavek.
------------------------------
Date: Wed, 13 Dec 2000 04:03:21 GMT
From: "EnIgMaBoM" <enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
Subject: Re: PERL INternet functions
Message-Id: <dyCZ5.35963$w35.6622978@news1.rdc1.nj.home.com>
My apologies. Here is what I have tried. I tried to use a scalar there, It
didnt take, then I tried the scalar in quotes, it didnt take, Then I tried
putting in predefing, obviously, frustration has gotten the best of me,
Please accept my apologies.
"Tony Curtis" <tony_curtis32@yahoo.com> wrote in message
news:87itopf04s.fsf@limey.hpcc.uh.edu...
>
> [ please quote the original text, *then* add your new text ]
>
> >> On Wed, 13 Dec 2000 03:45:48 GMT,
> >> "EnIgMaBoM"
<enigmabomb@home.gotohellspammers.ihopeyourotinghellyouspamminggarbage.com>
said:
>
> > anyhow, say I wanted to work in a Scalar where the URI
> > is, My attempts to do this failed miserably.
>
> You mean?
>
> my $location = 'http://www.some.where/';
> my $uri = new URI $location;
>
> But that seems too trivial to cause a conceptual problem.
> "My attempts to do this" doesn't help track down the
> problem unless you show everyone what you tried.
>
> hth
> t
> --
> Eih bennek, eih blavek.
------------------------------
Date: Wed, 13 Dec 2000 02:58:55 GMT
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Posting Guidelines for comp.lang.perl.misc ($Revision: 0.1 $)
Message-Id: <slrn93dpe4.nr.mgjv@verbruggen.comdyn.com.au>
On Tue, 12 Dec 2000 06:43:40 -0600,
Tad McClellan <tadmc@metronet.com> wrote:
>
>=head2 How to participate (post) in the clpm community
>
>=over 4
[snippage]
=item Do not post binaries, HTML, or MIME
clp.misc is a text only newsgroup. If you have images or binaries that
explain your question, put them in a publically accessible place (like
a Web server) and provide a pointer to that location. If you include
code, cut and paste it directly in the message body. Don't attach
anything to the message. Don't post vcards or HTML. many people (and
even some Usenet servers) will automatically filter out such messages.
Many people will not be able to decently read your post. Plain text is
something everyone can read.
Martien
--
Martien Verbruggen |
Interactive Media Division | You can't have everything, where
Commercial Dynamics Pty. Ltd. | would you put it?
NSW, Australia |
------------------------------
Date: Tue, 12 Dec 2000 20:16:57 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Posting Guidelines for comp.lang.perl.misc ($Revision: 0.1 $)
Message-Id: <slrn93dn0p.17v.tadmc@maxim.metronet.com>
Jon Bell <jtbell@presby.edu> wrote:
>Good start!
>
>How about mentioning proper formatting of posted responses? Something
>like:
>
> If you post a response to question or participate in an ongoing
> discussion, please make things easier for your readers by following
> these commonly accepted guidelines for formatting responses: quote
> *selectively* from the posting you're responding to, *attribute* those
> quotes properly to their author(s), and place your comments *after* the
> text that they respond to. For a more extensive discussion of this,
> see <http://www.geocities.com/nnqweb/nquote.html>.
How about the below?
--------------------------------------
=item Use an effective followup style
When composing a followup, quote only enough text to establish the
context for the comments that you will add. Never quote an entire
article. Never quote a .signature (unless that is what you are
commenting on).
Intersperse your comments B<following> the sections of quoted text
that your comment applies to.
--------------------------------------
--
Tad McClellan SGML consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 12 Dec 2000 21:23:02 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Posting Guidelines for comp.lang.perl.misc ($Revision: 0.1 $)
Message-Id: <slrn93dqsm.17v.tadmc@maxim.metronet.com>
Jeff Zucker <jeff@vpservices.com> wrote:
>Tad McClellan wrote:
>> Since clpmisc is such a high-traffic newsgroup (more than 100 articles
>> per day), there are some "crowd control" measures that have evolved
>> to keep things manageable.
>
>While "crowd control" is descriptive, it is also a bit off-putting.
Yeah, I missed that one. I had Larry's "Kindergarten quote" in
there and references to standing in line. They got taken out
when I was censoring myself. That one got left in.
>I
>suggest instead replacing everything after the comma with: "there are a
>number of measures that each reader can take to make the group most
>useable by the most number of people." Puts it more in the realm of
>personal responsibility rather than rules from the top.
I'll reword it somehow. Can anyone recommend a way without
the /most.*most/s in it? That sounds kinda cumbersome.
>> You can get a rough outline of the points made here by running:
>>
>> perl -ne 'print " $_" if /^=item/; print if /^=head/' thisfile.pod
>
>or, on windows:
Naw, let's not go down that slippery slope. I'll change it to:
-----------------------------------
while ( <> ) {
print if /^=head/;
print " $_" if /^=item/;
}
-----------------------------------
so we can avoid making all of the "shells" happy.
>> =item Check the Perl Frequently Asked Questions (FAQ)
>> ...
>> =item Check the other standard Perl docs (*.pod)
>
>I'd suggest a brief description of how to find these on a local install
>and a URL of where they can be located on the web, and either a brief
>description of -q and -f or a pointer to perldoc perldoc.
I don't want to supercede the How To Find The FAQ regular posting.
(I also don't want this post to get Too Big To Be Read)
I could put a pointer to that in somehow. Is it available
as a URL?
--
Tad McClellan SGML consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 12 Dec 2000 21:52:01 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Posting Guidelines for comp.lang.perl.misc ($Revision: 0.1 $)
Message-Id: <slrn93dsj0.17v.tadmc@maxim.metronet.com>
Rafael Garcia-Suarez <rgarciasuarez@free.fr> wrote:
>It may be useful to include some remarks about error and warning
>messages, how much useful they are, where to find them.
Err, I thought I had done that.
If you would like to suggest different wording, then let's have it :-)
>Tad McClellan wrote in comp.lang.perl.misc:
>>
>> You can look up any of the messages that perl might issue to
>> find out what the message means and how to resolve the
>> potential mistake (perldoc perldiag).
>
>"Note that CGI programs issue their error messages in the webserver's
>error logfile."
I don't want to put application-specific stuff in here. That has
nothing to do with Perl.
If the newsgroup shouts me down, I'll put it in anyway though.
So if you want your voice heard, let's see some followups in
support of adding that.
My case "against":
Putting it in is pretty much a symptom of the "partition a problem"
thing that is already in there.
It in fact meets perfectly one of the tests of off-topicness :-)
If the answer would be the same if you were using a different
programming language, then it is off-topic in a Perl newsgroup.
If you write your CGI program in C, messages go to the same place
as they would have if Perl was the programming language.
>> =head2 Social faux pax to avoid
> ^
>Typo: faux pas
Thanks.
>> =item Beware of saying "doesn't work"
>>
>> This is a "red flag" phrase. If you find yourself writing that,
>> pause and see if you can't describe what is not working without
>> saying "doesn't work". That is, describe how it is not what you want.
>
>"And if your program has produced some error messages, include them in
>your post."
How about the below?
-----------------------
Show the output (including the verbatim text of any messages)
of your program.
-----------------------
--
Tad McClellan SGML consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 12 Dec 2000 22:20:26 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Posting Guidelines for comp.lang.perl.misc ($Revision: 0.1 $)
Message-Id: <slrn93du8a.197.tadmc@maxim.metronet.com>
Eric Bohlman <ebohlman@omsdev.com> wrote:
>Tad McClellan <tadmc@metronet.com> wrote:
>> If you have no idea at all of how to code up your situation, be
>> sure to at least include the 2 things that you I<do> know: input and
^^^^^^^ I s/include/describe/
>> desired output.
>
>Describe precisely what your input should look like. Providing an example
>is helpful, but isn't enough.
How about if I work that in where I talk about input?
---------------------------
Describe B<precisely> the input to your program. Also provide example
input data for your program. If you need to show file input,
use the __DATA__ token (perldata.pod) to provide the file contents
inside of your Perl program.
---------------------------
>Nobody here is psychic; if you say the
>input should "look like this" you run the risk that readers a) will skip
>your post because they can't be bothered puzzling out what you meant b)
>will puzzle out what they think you meant and come up with something
>different, thereby wasting both your time and theirs, or c) will give you
>a silly answer (e.g. one that works only for the exact sample input you
>gave).
I'd rather leave that out. It's value/char count ratio is not
too attractive. Besides, I already trimmed out something along
the same lines in my self-edit. If I can snip mine, I can snip yours :-)
I plan to make up a stand-alone description of behaviors that
can get folks scored down, so that they can avoid getting scored
down.
But that isn't what _this_ post is about.
I had about 100 lines of "killfile discussion" in there earlier too.
I felt I had to get heavy handed about making it shorter, so it
all came out.
I'm really resisting making it much longer. I'd rather replace
something than add something (unless it is an entirely new
something).
--
Tad McClellan SGML consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
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 5096
**************************************
