[17277] in Perl-Users-Digest
Perl-Users Digest, Issue: 4699 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 23 14:15:41 2000
Date: Mon, 23 Oct 2000 11:15:26 -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: <972324925-v9-i4699@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 23 Oct 2000 Volume: 9 Number: 4699
Today's topics:
Re: Perl 5.005 or 5.6? (Andy Dougherty)
Perl and SANE jsills@my-deja.com
Perl outputs to dos instead of ie5 browser <micfrost@worldonline.dk>
Re: Perl outputs to dos instead of ie5 browser <gene@allsyshost.com>
Re: Perl outputs to dos instead of ie5 browser <ubl@schaffhausen.de>
Re: Perl outputs to dos instead of ie5 browser <micfrost@worldonline.dk>
Re: Perl outputs to dos instead of ie5 browser <micfrost@worldonline.dk>
Re: Perl outputs to dos instead of ie5 browser <godzilla@stomp.stomp.tokyo>
problem with ``system("clear");´´ <brian@reichholf.at>
problem with system("clear"); <brian@reichholf.at>
Q: how to convert 2 arrays to 1 hash <thomas2@dalnet.se>
Re: Q: how to convert 2 arrays to 1 hash <jeff@vpservices.com>
Question about perl -w <nico@monnet.to>
Re: Question about perl -w (Mark-Jason Dominus)
Regular Expression Help??? lefkogt@my-deja.com
Re: Regular Expression Help??? <bcaligari@my-deja.com>
Re: Regular Expression Help??? <bart.lateur@skynet.be>
Re: Regular Expression Help??? <godzilla@stomp.stomp.tokyo>
Re: regular expression (Daniel Chetlin)
Re: Subroutine reference/undef/redefine anomaly nobull@mail.com
why core dump ? <ronr@my-deja.com>
Re: Writing multiple files to a particular directory (Gwyn Judd)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 23 Oct 2000 13:44:54 -0000
From: doughera@maxwell.phys.lafayette.edu (Andy Dougherty)
Subject: Re: Perl 5.005 or 5.6?
Message-Id: <slrn8v8g8g.7ud.doughera@maxwell.phys.lafayette.edu>
In article <8t0tno$s86$1@provolone.cs.utexas.edu>, Logan Shaw wrote:
>But I'll stop now lest I get into my rant about how all software
>developers should be required to be system administrators for a few
>years, so they will see how brain-damaged 99.9% of all software
>installation procedures are.
Patches welcome :-).
>Perl's installation procedure, by the way, is not exempt. It is IMHO
>mildly broken. Not surprisingly, it's in a "do what I mean" sort of
>way: if the installation directory already contains "perl", it doesn't
>put the libraries in $prefix/lib/perl, just in $prefix/lib. As far as
>I know, there is no real way to tell it not to do this. (I would love
>for someone to prove me wrong!)
Any of the following ought to do what you want:
# The "brute force" way:
sh Configure -Dprivlib=/whatever -Dsitelib=/whatever ...
# The "do it once and store it for later re-use" way:
vi Policy.sh
sh Configure -des
# The "read Porting/Glossary for underdocumented Configure
# variables you can set" way:
sh Configure -Dinstallstyle='lib/perl5'
--
Andy Dougherty doughera@lafayette.edu
Dept. of Physics
Lafayette College, Easton PA 18042
------------------------------
Date: Mon, 23 Oct 2000 16:24:17 GMT
From: jsills@my-deja.com
Subject: Perl and SANE
Message-Id: <8t1ona$65q$1@nnrp1.deja.com>
Anyone using Perl and SANE (Scanner Access Now Easy)?
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 23 Oct 2000 16:00:28 +0200
From: "Michael Frost" <micfrost@worldonline.dk>
Subject: Perl outputs to dos instead of ie5 browser
Message-Id: <VzXI5.8638$Uy5.372743@news000.worldonline.dk>
What should I do to test my perl cgi before uploading to the webserver?
It prints this simple response to a dos window (win98), instead of the
explorer! <filename: hello.pl> :
print "Content-type: text/html\n\n" ;
print <<EOF ;
<html>
<head><title>CGI Results</title></head>
<body>
<h1>Hello, world.</h1>
</body>
</html>
EOF
exit ;
shouldn't the Perl STDOUT output to my ie5 browser window?
-Michael
------------------------------
Date: Mon, 23 Oct 2000 14:24:05 GMT
From: "Gene" <gene@allsyshost.com>
Subject: Re: Perl outputs to dos instead of ie5 browser
Message-Id: <9SXI5.7675$NP.536894@news.flash.net>
> shouldn't the Perl STDOUT output to my ie5 browser window?
No. STDOUT, in your case, is the DOS window. You are executing the program
from a command prompt, even if you just have perl associated with the .pl
files in windows, because it has to execute the 'perl.exe' command, which is
a DOS program. The only way to get the STDOUT to be your browser, that I
know of, is to execute the program from the browser. This means you have to
have some kind of web server running on your local computer.
-gene
------------------------------
Date: Mon, 23 Oct 2000 17:23:32 +0200
From: Malte Ubl <ubl@schaffhausen.de>
Subject: Re: Perl outputs to dos instead of ie5 browser
Message-Id: <39F457F3.501D66FB@schaffhausen.de>
Michael Frost schrieb:
>
> What should I do to test my perl cgi before uploading to the webserver?
> It prints this simple response to a dos window (win98), instead of the
> explorer! <filename: hello.pl> :
>
> print "Content-type: text/html\n\n" ;
>
> print <<EOF ;
> <html>
> <head><title>CGI Results</title></head>
> <body>
> <h1>Hello, world.</h1>
> </body>
> </html>
> EOF
>
> exit ;
>
> shouldn't the Perl STDOUT output to my ie5 browser window?
>
> -Michael
What you need is a web server on your local machine.
malte
--
$me = Person->new("Malte Ubl");
$me->comp ("Schaffhausen | Interactive");
$me->job ("Developer for web-based Applications");
$me->phone("+49 4121 472964");
$me->fax ("+49 4121 472938");
exit; # reference count = 0 -> $me->DESTROY
------------------------------
Date: Mon, 23 Oct 2000 18:03:21 +0200
From: "Michael Frost" <micfrost@worldonline.dk>
Subject: Re: Perl outputs to dos instead of ie5 browser
Message-Id: <enZI5.31$B02.1758@news010.worldonline.dk>
I have tried to execute the cgi from my browser within a HTML document:
<A HREF="hello.pl">RUN hello.pl</A>
however the DOS windows is still used as STDOUT.
Is it really necessary to install a webserver on my local computer, in order
to test simple cgi scripts (like hello.pl) before upload to the 'real'
server?
------------------------------
Date: Mon, 23 Oct 2000 18:09:33 +0200
From: "Michael Frost" <micfrost@worldonline.dk>
Subject: Re: Perl outputs to dos instead of ie5 browser
Message-Id: <ZsZI5.35$B02.1956@news010.worldonline.dk>
> What you need is a web server on your local machine.
>
> malte
ok. I got it :)
Can you recommend any nice webserver for doing cgi-testing on win98?
also, would there be a problem in uploading the tested scripts to a Linux
webserver?
------------------------------
Date: Mon, 23 Oct 2000 09:35:59 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Perl outputs to dos instead of ie5 browser
Message-Id: <39F468EF.7A12CF31@stomp.stomp.tokyo>
Michael Frost wrote:
> I have tried to execute the cgi from my browser within a HTML document:
> <A HREF="hello.pl">RUN hello.pl</A>
> however the DOS windows is still used as STDOUT.
> Is it really necessary to install a webserver on my local computer,
> in order to test simple cgi scripts (like hello.pl) before upload
> to the 'real' server?
No, this is not an absolute requirement. Your script's output,
as you know, will appear in DOS very much like you see for
a telnet return; it's plaintext in nature. There are two basic
disadvantages with this method. One disadvantage is a need to
enter arguments manually and, the other, is a need to read your
plaintext style output to check for correctness. Your DOS window
cannot present html as we might like. However, your DOS window
will yield results which are enough to confirm correct operation.
There are distinct advantages to using DOS only for checking
your scripts. Using DOS only, you are able to avoid this mess
of having to install a web server on your system and avoid
configuration headaches, which are numerous and noticable if
you keep track of articles posted here, articles related to
your concerns.
Perl installs for DOS/Win machines, some hold an opinion this
is the way to go, others like myself, hold an opinion Perl,
under these circumstances, is not suitable for installation
on a home system. Perl is not well ported for a DOS/Win type
platform and, inherently, there are a lot of challenges in
setting up Perl and a web server on a home system. Unfortunately,
those who wrote Perl for Win, failed to include a Graphic
User Interface and failed to include an effective install
wizard for Win machines. In this aspect, Perl for Win machines
is a very poor piece of programming; it is incomplete.
You may discover, in a final analysis, you are better off to
run simple beta tests on your scripts at home, then upload
your scripts to your server for reality testing. Regardless
of how you install a web server at home, you will never be
able to duplicate this reality we know as the World Wide Web,
at home.
Yes, you need a local web server installed to run cgi scripts
as you would on an actual internet service provider. However,
you will discover yourself making corrections to your script
to effectively run on our web, after being tested on a home
type web server. Tests you run at home, are not a good
substitute for reality.
Your decision then, is how much time and effort are you willing
to invest setting up a web server on your home system.
Godzilla!
------------------------------
Date: Mon, 23 Oct 2000 19:27:33 +0200
From: "Brian Reichholf" <brian@reichholf.at>
Subject: problem with ``system("clear");´´
Message-Id: <39f4750a$0$21768@SSP1NO25.highway.telekom.at>
at last i found the perlfaq and a way to clear the screen,
the command is system("clear"); for infrequent use and
$clear_string = `clear`;
print $clear_string;
to print it 100+ times....
but if i use ``system("clear");´´
the following error occurs (note: i have the german version of Win2000
that's why it's in german but i'll try and translate it!):
German:
--------
Der Befehl "clear" ist entweder falsch geschrieben oder konnte nicht
gefunden werden.
--------
English (something like):
--------
The command "clear" couldn't be found or is spelled wrongly.
--------
if I use ``$clear_string = `clear`; print $clear_string;´´ then it just
prints `clear´ and doesn't clear the screen..
finally i tried the following version:
line:
12 use Term::Cap
13 $terminal = Term::Cap->Tgetent( {OSPEED => 9600} );
15 $clear_string = $terminal->Tputs('cl');
but then this error occurs:
------
TERM not set at C:\progra~1\minmax.pl line 13
BEGIN failed--compilation abortet at C:\progra~1\minmax.pl line 13.
------
does anyone know what went wrong and why?
------------------------------
Date: Mon, 23 Oct 2000 19:26:11 +0200
From: "Brian Reichholf" <brian@reichholf.at>
Subject: problem with system("clear");
Message-Id: <39f474ba$0$22746@SSP1NO25.highway.telekom.at>
at last i found the perlfaq and a way to clear the screen,
the command is system("clear"); for infrequent use and
$clear_string = `clear`;
print $clear_string;
to print it 100+ times....
but if i use ``system("clear");´´
the following error occurs (note: i have the german version of Win2000
that's why it's in german but i'll try and translate it!):
German:
--------
Der Befehl "clear" ist entweder falsch geschrieben oder konnte nicht
gefunden werden.
--------
English (something like):
--------
The command "clear" couldn't be found or is spelled wrongly.
--------
if I use ``$clear_string = `clear`; print $clear_string;´´ then it just
prints `clear´ and doesn't clear the screen..
finally i tried the following version:
line:
12 use Term::Cap
13 $terminal = Term::Cap->Tgetent( {OSPEED => 9600} );
15 $clear_string = $terminal->Tputs('cl');
but then this error occurs:
------
TERM not set at C:\progra~1\minmax.pl line 13
BEGIN failed--compilation abortet at C:\progra~1\minmax.pl line 13.
------
does anyone know what went wrong and why?
------------------------------
Date: Mon, 23 Oct 2000 17:45:26 GMT
From: "Thomas Åhlen" <thomas2@dalnet.se>
Subject: Q: how to convert 2 arrays to 1 hash
Message-Id: <WO_I5.387$Rj1.13990@news.bahnhof.se>
If i have this
$key_array = [ 'a', 'b', 'c' ];
$value_array = [ 1, 2, 3 ];
what is the easies way to get this
$hash = { 'a' => 1, 'b' => 2, 'c' => 3 };
There must be a simple oneliner for this something like..
$hash->{@$key_array} = @$value_array;
well i know this one doesn't work and why..
Thanks
Thomas
------------------------------
Date: Mon, 23 Oct 2000 11:00:22 -0700
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Q: how to convert 2 arrays to 1 hash
Message-Id: <39F47CB6.2C5BF598@vpservices.com>
"Thomas Åhlen" wrote:
>
> If i have this
>
> $key_array = [ 'a', 'b', 'c' ];
> $value_array = [ 1, 2, 3 ];
>
> what is the easies way to get this
>
> $hash = { 'a' => 1, 'b' => 2, 'c' => 3 };
my($i,$hash);
%$hash = map { $_ => $value_array->[$i++] } @$key_array;
--
Jeff
------------------------------
Date: Mon, 23 Oct 2000 16:42:22 +0100
From: "Nicolas MONNET" <nico@monnet.to>
Subject: Question about perl -w
Message-Id: <w%YI5.2105$N3.71657@tengri.easynet.fr>
If I get too many warnings, do I get suspended?
--
perl -e 'print `echo Just a Lame Perl Luser | gzip -9 | cat | gzip -cd`'
------------------------------
Date: Mon, 23 Oct 2000 15:59:52 GMT
From: mjd@plover.com (Mark-Jason Dominus)
Subject: Re: Question about perl -w
Message-Id: <39f46077.6bf2$ab@news.op.net>
In article <w%YI5.2105$N3.71657@tengri.easynet.fr>,
Nicolas MONNET <nico@monnet.to> wrote:
>
>If I get too many warnings, do I get suspended?
Starting in Perl 5.7, each warning will be associated with a number of
'points' which will be charged against your Perl License. When you
accumulate too many points, your will be required to attend a
retaining class and pay a fine before you can execute Perl again.
------------------------------
Date: Mon, 23 Oct 2000 16:24:09 GMT
From: lefkogt@my-deja.com
Subject: Regular Expression Help???
Message-Id: <8t1omv$65j$1@nnrp1.deja.com>
$out_emails[0] =~ m/.\@./i
Would the above find an "@" anywhere in the string?
If not, please correct it.
Thanks
Gary
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 23 Oct 2000 16:28:43 GMT
From: Brendon Caligari <bcaligari@my-deja.com>
Subject: Re: Regular Expression Help???
Message-Id: <8t1ovh$6ah$1@nnrp1.deja.com>
In article <8t1omv$65j$1@nnrp1.deja.com>,
lefkogt@my-deja.com wrote:
> $out_emails[0] =~ m/.\@./i
>
> Would the above find an "@" anywhere in the string?
>
> If not, please correct it.
>
> Thanks
> Gary
the /i means case insensitive....which in this case is redundant.
your string matches an @ sign that is preceeded and followed by any
character.
I presume you intend to place your 'match' as part of some other
expression as on it's own it's not really doiing much.
B
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 23 Oct 2000 16:43:49 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: Regular Expression Help???
Message-Id: <8jq8vscut6popkltgsnig5h9ec5kev1fpf@4ax.com>
lefkogt@my-deja.com wrote:
>$out_emails[0] =~ m/.\@./i
>
>Would the above find an "@" anywhere in the string?
>
>If not, please correct it.
No. It won't find an '@' at the beginning or at the end of a string
because of the dots, which need to match a character (anything but a
newline). In this case, I think this is a Good Thing.
You don't need the /i though: neither '@' nor /./ are case sensitive.
--
Bart.
------------------------------
Date: Mon, 23 Oct 2000 09:58:51 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Regular Expression Help???
Message-Id: <39F46E4B.5571E689@stomp.stomp.tokyo>
lefkogt@my-deja.com wrote:
> $out_emails[0] =~ m/.\@./i
> Would the above find an "@" anywhere in the string?
> If not, please correct it.
You will discover the index () function
to be faster and more reliable than regex
style matching.
if (index ($input, "@") > -1)
{ do stuff here; }
To answer your question, yes, your matching operator
will match an @ anywhere "in" a string. Use of i for
ignore case is not needed. This should be qualified,
as long as your $out_emails is being correctly read
and " @ " is truly available for matching.
Suppose I should add, I quoted "in" for a reason.
Your matching operator will fail if @ is the first
or last character of a string. Use .* instead.
This is why index is more reliable than a regex;
human error is less likely.
* smiles *
Godzilla!
------------------------------
Date: 23 Oct 2000 14:23:25 GMT
From: daniel@chetlin.com (Daniel Chetlin)
Subject: Re: regular expression
Message-Id: <8t1hkt02r87@news2.newsguy.com>
On Mon, 23 Oct 2000 11:55:23 GMT,
joelyhughes@my-deja.com <joelyhughes@my-deja.com> wrote:
>Hi,
>I need a regex (or more than one?) which can indentify all tags of a
>certain type in a HTML doc which have a certain parameter. I then want
>to be able to alter an additional parameter (inserting it if it does
>not previously exist) with a new value.
I respectfully submit that you don't need a REx; you need a solution.
It's dangerous to lock oneself into a single way of solving a problem,
especially when the problem domain isn't particularly well-known by you.
If I had a solution that used the Frobnitz module, but it did exactly
what you want, would you object?
>I though I'd start off with somthing like
>/<INPUT.*TYPE='HIDDEN'.*>/gi
>Can I then pump these results into another regex which look for the
>attributes?
You probably could, but I wouldn't suggest it. Parsing HTML with RExen
is very easy to screw up even for people who have been using Perl for a
long time.
Consider what could go wrong with your above expression: if you have
this HTML:
<INPUT TYPE='SUBMIT>foo bar baz<BLARCH TYPE='HIDDEN'>
Your REx will merrily eat up the whole thing.
Believe me when I tell you that for every potential REx you can throw at
me, I can more than likely come up with a way that it can be fooled.
Remember the Frobnitz module I mentioned above? It's really called
HTML::Parser and friends. See below for an example using HTML::Parser
that might do something like what you're looking for.
For this example, I'm going to pretend you're looking for all anchor
tags (<A>) with a `href' parameter, and adding a `name' parameter if it
doesn't already exist. You'll want to replace that with what you're
really doing. Go fish.
#!/usr/bin/perl -w
use strict;
use HTML::Parser;
my $parser = HTML::Parser::->new( api_version => 3 );
$parser->handler( default => sub { print @_ }, "text" );
{ # For an unsullied closure
my $count = 0; # Variable to increment the name anchors
$parser->handler( start =>
sub {
my ($tagname, $attr, $tokenpos, $text) = @_;
print $text and return unless $tagname eq 'a';
print $text and return unless $attr->{href} &&
!$attr->{name};
# Find the end of the last token
my $pos = $tokenpos->[-2] + $tokenpos->[-1];
substr($text, $pos, 0) = " name='Anchor$count'";
$count++;
print $text;
}, "tagname, attr, tokenpos, text"
);
}
$parser->parse($_) while <>;
$parser->eof;
This script (tested, but not exhaustively) takes a filename on the
command line or HTML on standard input and produces modified HTML out
standard output. When it sees an anchor tag without a name attribute
(e.g. `<a href="foo">') it gives it a unique anchor name (e.g. `<a
href="foo" name='Anchor3'>'). This is not immensely useful, but ought to
give you an idea of what you're looking for.
Be sure to see the excellent manpage for HTML::Parser.
-dlc
------------------------------
Date: 23 Oct 2000 17:58:15 +0100
From: nobull@mail.com
Subject: Re: Subroutine reference/undef/redefine anomaly
Message-Id: <u9pukrsdeg.fsf@wcl-l.bham.ac.uk>
Jim Mauldin <mauldin@netstorm.net> writes:
> nobull@mail.com wrote:
> > Undefining and then redefining a subroutine creates an anomalous state
> > in references to the old subroutine.
> When you declare:
> my $old_foo = \&foo;
>
> a new Perl reference (with a different reference ID) is created that
> contains the same pointer to the sub as the one in the symbol table for
> &foo, and the reference count is increased to 2. When you undef &foo,
> the reference count of $$old_foo decreases to 1 and the status of both
> references are set to undef, even though the code continues to exist.
No, undef(THING) causes THING to become undefined, it doesn't
disconnect references to THING. Any references to the old thing now
refer to the undefined thing.
use vars qw($foo);
$foo=2;
my $fooref=\$foo;
undef $foo;
print 0 + defined $$fooref;
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Mon, 23 Oct 2000 13:23:46 GMT
From: Ronald J.H. Rood <ronr@my-deja.com>
Subject: why core dump ?
Message-Id: <8t1e4u$t33$1@nnrp1.deja.com>
Hi,
I am relatively new to perl. This is a little excercise script:
perl 5.6.0 aix
dbi 1.14
dbd oracle 1.06
------------------------------------
#!/usr/bin/perl -w
use DBI;
my $dbuser = $ENV{ORACLE_USERID} || 'scott/tiger';
my $getRows = 'select count(*) from TABLE_NAME';
my $dbh = DBI->connect('dbi:Oracle:', $dbuser, '', {
AutoCommit => 1,
PrintError => 0,
}) or die "Couldn't connect to database: " . DBI->errstr;
my $sth = $dbh->prepare('SELECT table_name, owner FROM all_tables WHERE
table_name like upper (?) ')
or die "Couldn't prepare statement: " . $dbh->errstr;
print "Enter table name> ";
while ( defined ($table_pattern = <>) && ( length ($table_pattern) > 0 )
) { # Read input from the user
my @data;
my $count_rows;
chomp $table_pattern;
$sth->execute($table_pattern) # Execute the query
or die "Couldn't execute statement: " . $sth->errstr;
# Read the matching records and print them out
while (@data = $sth->fetchrow_array()) {
my $table_name = $data[0];
my $owner = $data[1];
($count_rows = $getRows) =~ s/TABLE_NAME/$owner.$table_name/ ;
# $count_rows now contains something like select count(*) from
owner.table
my $sth = $dbh->prepare( $count_rows)
or die "Couldn't prepare statement: " . $dbh->errstr .
$count_rows;
$sth->execute() # Execute the query
or die "Couldn't execute statement: " . $sth->errstr;
@data = $sth->fetchrow_array();
my $rows = $data[0];
print "\t$count_rows has $rows rows\n";
}
if ($sth->rows == 0) {
print "No tables matched `$table_name'.\n\n";
}
print "\n";
print "Enter table_name> ";
}
$sth->finish;
$dbh->disconnect;
---------------------------------------
It just counts the number of rows in a table whose name[s] matches the
specified pattern and prints the results. When I quit I get a coredump.
Is this because of my imperfect perl code ?
Do you see a better way to code this ? comments are very welcome.
I also want to stop the loop when $table_pattern = empty. Now it does
not stop; that's because the newline or something similar is in
$table_pattern. How should I change that ?
Thanks for your time,
Ronald
http://unix-dba.myweb.nl
The best way to accellerate a computer 'running' windows is by
gravitation
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 23 Oct 2000 13:48:29 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Writing multiple files to a particular directory
Message-Id: <slrn8v8gd7.2nc.tjla@thislove.dyndns.org>
I was shocked! How could Tad McClellan <tadmc@metronet.com>
say such a terrible thing:
>On 22 Oct 2000 16:31:45 -0500, Logan Shaw <logan@cs.utexas.edu> wrote:
>>In article <slrn8v6dj2.17n.tadmc@magna.metronet.com>,
>>Tad McClellan <tadmc@metronet.com> wrote:
>>>What is help.com, and what relationship does it have to this newsgroup?
>>
>>Apparently help.com (which is part of CNET) is advertising
>>comp.lang.perl.misc as part of its "Help Centers".
>
>
>OIC. (Oh, I see).
>
>Can articles posted via help.com be recognized somehow?
>
>Like do they put "help.com" in the Message ID or anything?
I haven't looked at it in that way (I presume you're looking for some way
to killfile them :) ) but they do have a distinctive signature file.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
Conversation, n.:
A vocal competition in which the one who is catching his breath
is called the listener.
------------------------------
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 4699
**************************************
