[7562] in Perl-Users-Digest
Perl-Users Digest, Issue: 1188 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 17 00:07:20 1997
Date: Thu, 16 Oct 97 21:00:23 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 16 Oct 1997 Volume: 8 Number: 1188
Today's topics:
(Q-newbie):embed C in perl <griffin@ccis.adisys.com.au>
Re: Any plans for Min and Max operators? (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Re: Any plans for Min and Max operators? (Jahwan Kim)
Re: Any plans for Min and Max operators? (Damian Conway)
Bi-directional Socket Clients? (Mark Nottingham)
file compression and decompression <girardj@primenet.com>
File Name Too Long Error (Drake Cleary)
Re: Global Search and Replace Question (John L. Allen)
Re: Global Search and Replace Question (Drake Cleary)
Re: Global Search and Replace Question (Tad McClellan)
Re: Looking for a function like the VB-funktion ASC("A" (Jot Powers)
Re: Looking for a function like the VB-funktion ASC("A" (Kerry Schwab)
Re: Looking for a function like the VB-funktion ASC("A" (brian d foy)
Re: Q: Perl Distribution? <rootbeer@teleport.com>
Q: Perl upload protocols (Daryn Brightblade)
qqq (Steven Duffy)
Re: Scope of LABELs <rootbeer@teleport.com>
Re: sorting a hash <bfawcett@myriad.com>
Re: sorting a hash (Jeffrey Drumm)
Re: String manipulation in Perl <jgoerzen+usenet@complete.org>
Re: We're targets. <jgoerzen+usenet@complete.org>
Re: Web Programmer Wanted (Faust Gertz)
Re: Web Programmer Wanted <bfawcett@myriad.com>
Re: Web Programmer Wanted (Tad McClellan)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 17 Oct 1997 02:06:53 GMT
From: Rebecca Griffin <griffin@ccis.adisys.com.au>
Subject: (Q-newbie):embed C in perl
Message-Id: <3446C83D.6D04@ccis.adisys.com.au>
I am a beginner with perl and I am trying to learn how to embed C code
in Perl (v5.002). I have followed the steps in the perlxstut man page
including the following:
- Run "h2xs -A -n Mytest"
- Let's edit the .xs file by adding this to the end of the file:
void
hello()
CODE:
printf("Hello, world!\n");
- Run "perl Makefile.PL"
- Create a file called hello that looks like this:
#! /opt/perl5/bin/perl
use lib './blib';
use Mytest;
Mytest::hello();
- Now we run the script and we should see the following output:
% perl hello
Hello, world!
%
All the files created by running "h2xs" appear to match those in the xs
tut, and running "make" produces the expected output as detailed in the
tut.
However, I get the following error when trying to run the script:
"Can't load './Mytest.o' for module Mytest: Exec format error at
/opt/local/lib/perl5/DynaLoader.pm line 140.
at Mytest.pm line 18
BEGIN failed--compilation aborted at hello line 5."
Line 140 of DynaLoader.pm contains the following command:
"my $libref = dl_load_file($file) or
Carp::croak("Can't load '$file' for module $module:
".dl_error()."\n");"
Can anyone please help?
------------------------------
Date: Thu, 16 Oct 97 20:12:43 -0400
From: bsa@void.apk.net (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Subject: Re: Any plans for Min and Max operators?
Message-Id: <3446ae2a$1$ofn$mr2ice@speaker>
In <Pine.GSO.3.96.971016131214.20497i-100000@usertest.teleport.com>, on
10/16/97 at 01:15 PM,
Tom Phoenix <rootbeer@teleport.com> said:
+-----
| On Thu, 16 Oct 1997, Paul Moore wrote:
| > You also need variations which use lt and gt (string comparison)
| > instead of < and > (numeric comparison).
| I've never seen a real-world situation which needed those. But, OTOH, it
| would be nice to have a definable order, a la sort(). (Note that with this,
| you wouldn't need two subs, so we could call it 'extreme' or some such.)
| sub min { extreme { $a < $b } @_ }
| sub max { extreme { $a > $b } @_ }
+--->8
Which brings us to:
sub min { (sort {$a <=> $b} @_)[0] }
sub max { (sort {$b <=> $a} @_)[0] }
and a question: what's the point?
--
brandon s. allbery [Team OS/2][Linux] bsa@void.apk.net
cleveland, ohio mr/2 ice's "rfc guru" :-) KF8NH
Warpstock '97: OS/2 for the rest of us! http://www.warpstock.org
Memo to MLS: End The Burn Scam --- Doug Logan MUST GO! FORZA CREW!
------------------------------
Date: 17 Oct 1997 00:49:58 GMT
From: jahwan@supernova.math.lsa.umich.edu (Jahwan Kim)
Subject: Re: Any plans for Min and Max operators?
Message-Id: <slrn64ddhl.7lt.jahwan@supernova.math.lsa.umich.edu>
On Thu, 16 Oct 97 20:12:43 -0400, Brandon S. Allbery KF8NH;
to reply, change "void" to "kf8nh" <bsa@void.apk.net> wrote:
> In <Pine.GSO.3.96.971016131214.20497i-100000@usertest.teleport.com>, on
> 10/16/97 at 01:15 PM,
> Tom Phoenix <rootbeer@teleport.com> said:
> +-----
> | On Thu, 16 Oct 1997, Paul Moore wrote:
> | > You also need variations which use lt and gt (string comparison)
> | > instead of < and > (numeric comparison).
> | I've never seen a real-world situation which needed those. But, OTOH, it
> | would be nice to have a definable order, a la sort(). (Note that with this,
> | you wouldn't need two subs, so we could call it 'extreme' or some such.)
> | sub min { extreme { $a < $b } @_ }
> | sub max { extreme { $a > $b } @_ }
> +--->8
>
> Which brings us to:
>
> sub min { (sort {$a <=> $b} @_)[0] }
> sub max { (sort {$b <=> $a} @_)[0] }
>
> and a question: what's the point?
>
> --
> brandon s. allbery [Team OS/2][Linux] bsa@void.apk.net
> cleveland, ohio mr/2 ice's "rfc guru" :-) KF8NH
> Warpstock '97: OS/2 for the rest of us! http://www.warpstock.org
> Memo to MLS: End The Burn Scam --- Doug Logan MUST GO! FORZA CREW!
>
Of course there're zillion other (some of them more efficient) ways to
implement min and max. The overhead of sort will be enormous, i.e., O(n)
versus O(n log n) (hmm... I'm not so sure about this.)
Cheers,
Jahwan
------------------------------
Date: 17 Oct 1997 03:16:59 GMT
From: damian@cs.monash.edu.au (Damian Conway)
Subject: Re: Any plans for Min and Max operators?
Message-Id: <626lbb$5f5$1@towncrier.cc.monash.edu.au>
I'd prefer to see "automagic" selection of the comparison operator
according to the types of the arguments:
sub extreme (&@); # AS PREVIOUSLY PROPOSED
sub max ($@)
{
local $^W = 0;
for ( @_ ) { return extreme {$_[0] gt $_[1]} @_ if $_+0 ne $_ }
return extreme {$_[0] > $_[1]} @_;
}
sub min ($@)
{
local $^W = 0;
for ( @_ ) { return extreme {$_[0] lt $_[1]} @_ if $_+0 ne $_ }
return extreme {$_[0] < $_[1]} @_;
}
Damian
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
who: Damian Conway email: damian@cs.monash.edu.au
where: Computer Science Dept. web: http://www.cs.monash.edu.au/~damian
Monash University quote: "The best form of self-defence is
Clayton 3168, Australia not being there in the first place"
------------------------------
Date: Fri, 17 Oct 1997 13:42:16 +1000
From: mnot@pobox.com (Mark Nottingham)
Subject: Bi-directional Socket Clients?
Message-Id: <mnot-ya02408000R1710971342160001@192.168.1.1>
Hello out there,
Simple question (I hope). I'm following the cookbook examples in the
perlipc pages to put together a unix-domain socket client/server; I need to
talk bi-directionally. It's easy in the server side, as STDIN and STDOUT
are both connected up for me, but what about in the client? Is there a way
to get separate handles with connect()?
I can read or write to the SOCK handle as in the cookbook, but I'd like to
do both. I haven't tried resetting the filepointer or anything like that,
as it SEEMS there should be a better way to do it...
Thanks (and please respond by e-mail as well),
--
Mark Nottingham
Melbourne, Australia
mnot@pobox.com
------------------------------
Date: 16 Oct 1997 16:33:00 -0700
From: "Jeff Girard" <girardj@primenet.com>
Subject: file compression and decompression
Message-Id: <01bcda8b$e3ace740$78da1b8a@girardj.army.mil>
I am looking for a function that will take as input a series of
filehandles, compress those files into one large file, and return that
file. If I could have my cake and eat it too, I would like that compressed
file to be a self-extractor. If not, then I would need the decompression
function also.
Anybody have any good routines or pointers that they would want to share?
Jeff
girardj@huachuca-emh1.army.mil or girardj@primenet.com
------------------------------
Date: Thu, 16 Oct 1997 21:50:24 GMT
From: killbell@peterboro.net (Drake Cleary)
Subject: File Name Too Long Error
Message-Id: <34468ba4.9469454@news.peterboro.net>
On 16 Oct 1997 17:25:15 -0400, allen@gateway.grumman.com (John L.
Allen) wrote:
>In article <34465a4a.12102284@news.peterboro.net>,
>Drake Cleary <killbell@peterboro.net> wrote:
>>I'm trying to do a search and replace for my whole web site with the
>>following....
>>
>>perl -p0777i -e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;' `find . -name
>>'*.html' -print`
>>
>>It works fine up to a certain number of files.... then unix gives an
>>error...
>>
>>Is there any command that will work regardless of the number of
>>files???
>
>If you're getting something like ``arg list too long'', try this
>
> perl -p0777i -e 'BEGIN { @ARGV=`find . -name "*.html" -print` }' \
> -e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;'
>
>Should work fine.
>
>John.
The arg list too long error is replaced by FILE NAME TOO LONG error!
Is there any way around that?
Thanks, by the way!
------------------------------
Date: 16 Oct 1997 17:25:15 -0400
From: allen@gateway.grumman.com (John L. Allen)
Subject: Re: Global Search and Replace Question
Message-Id: <6260nr$pe2@gateway.grumman.com>
In article <34465a4a.12102284@news.peterboro.net>,
Drake Cleary <killbell@peterboro.net> wrote:
>I'm trying to do a search and replace for my whole web site with the
>following....
>
>perl -p0777i -e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;' `find . -name
>'*.html' -print`
>
>It works fine up to a certain number of files.... then unix gives an
>error...
>
>Is there any command that will work regardless of the number of
>files???
If you're getting something like ``arg list too long'', try this
perl -p0777i -e 'BEGIN { @ARGV=`find . -name "*.html" -print` }' \
-e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;'
Should work fine.
John.
--
_/JohnL\_allen@gateway.grumman.com <Sun>: 9.5 billion pounds per sec to energy
~\Allen/~Fax: 516-575-7428 <Universe>: 1e22 stars = 22 solar masses per sec
------------------------------
Date: Thu, 16 Oct 1997 21:51:32 GMT
From: killbell@peterboro.net (Drake Cleary)
Subject: Re: Global Search and Replace Question
Message-Id: <34468c5b.9652684@news.peterboro.net>
>In article <34465a4a.12102284@news.peterboro.net>,
>Drake Cleary <killbell@peterboro.net> wrote:
>>I'm trying to do a search and replace for my whole web site with the
>>following....
>>
>>perl -p0777i -e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;' `find . -name
>>'*.html' -print`
>>
>>It works fine up to a certain number of files.... then unix gives an
>>error...
>>
>>Is there any command that will work regardless of the number of
>>files???
>
>If you're getting something like ``arg list too long'', try this
>
> perl -p0777i -e 'BEGIN { @ARGV=`find . -name "*.html" -print` }' \
> -e 's/ - \d Home Pages/\<\!-- 0 --\>/gm;'
>
>Should work fine.
>
>John.
The arg list too long error is replaced by FILE NAME TOO LONG error!
Is there any way around that?
Thanks, by the way!
------------------------------
Date: Thu, 16 Oct 1997 22:14:27 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Global Search and Replace Question
Message-Id: <j6l626.n5k.ln@localhost>
Drake Cleary (killbell@peterboro.net) wrote:
: The arg list too long error is replaced by FILE NAME TOO LONG error!
: Is there any way around that?
Yes.
The same fix that I suggested would fix the first error would
also fix this one ;-)
If the shell is getting in your way, then do it all in perl.
(ie. File::Find the files from within the script)
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: 16 Oct 1997 21:47:37 GMT
From: news@bofh.com (Jot Powers)
Subject: Re: Looking for a function like the VB-funktion ASC("A")
Message-Id: <62621p$p1v$1@gazette.corp.medtronic.com>
In article <344683A4.9EB3AC30@netway.at>, Christian Putz wrote:
>
>--------------DCF1CBFEA140B823B4D4B520
>Content-Type: text/plain; charset=us-ascii
>Content-Transfer-Encoding: 7bit
Straight US-Ascii and you used mime. Your newsreader is a POS.
>I need for a perlscript a function like one I know from Visual Basic.
>
>Testnumber = Asc("A") ........................... the result is 65.
node127% grep -i ascii perlfunc.1
For example, \f(CWchr(65)\fR is \*(L"A\*(R" in \s-1ASCII\s0. For the reverse,
use the \f(CWord\fR entry elsewhere in this document .
\& system "stty", 'icanon', 'eol', '^@'; # ASCII null
Returns the numeric ascii value of the first character of \s-1EXPR\s0. If
\& A An ascii string, will be space padded.
\& a An ascii string, will be null padded.
node127% perldoc perlfunc
PERLFUNC(1) User Contributed Perl Documentation PERLFUNC(1)
NAME
perlfunc - Perl builtin functions
DESCRIPTION
The functions in this section can serve as terms in an
...
/ascii
ord Returns the numeric ascii value of the first
character of EXPR. If EXPR is omitted, uses $_.
For the reverse, see the chr entry elsewhere in this
document .
node127% perl -e 'print ord A'
65
>--------------DCF1CBFEA140B823B4D4B520
>Content-Type: text/html; charset=us-ascii
>Content-Transfer-Encoding: 7bit
*snip* and a copy in html. *shakes head*
--
Jot Powers news@bofh.com
Unix System Administrator
"Sometimes you just have to grab the bull by the tail and face the situation."
------------------------------
Date: 16 Oct 1997 10:37:22 -0600
From: kschwab@nyx.net (Kerry Schwab)
Subject: Re: Looking for a function like the VB-funktion ASC("A")
Message-Id: <625fs2$p3s$1@nyx10.nyx.net>
In article <344683A4.9EB3AC30@netway.at>,
Christian Putz <Marion@netway.at> wrote:
>-=-=-=-=-=-
>
>Hy!
>
>I need for a perlscript a function like one I know from Visual Basic.
>
>Testnumber = Asc("A") ........................... the result is 65.
>
>
>Thank You for everyone who helps me.
>Christian
>
>-=-=-=-=-=-
>[Alternative: text/html]
>-=-=-=-=-=-
You are looking for ord().
perldoc -f ord
--
Kerry
------------------------------
Date: Thu, 16 Oct 1997 23:19:07 -0500
From: comdog@computerdog.com (brian d foy)
Subject: Re: Looking for a function like the VB-funktion ASC("A")
Message-Id: <6265k3$86r@bgtnsc01.worldnet.att.net>
In article <344683A4.9EB3AC30@netway.at>, Christian Putz
<Marion@netway.at> wrote:
> I need for a perlscript a function like one I know from Visual Basic.
>
> Testnumber = Asc("A") ........................... the result is 65.
have you looked into the ord() function? see the perlfunc man page
for details :)
--
brian d foy <http://computerdog.com>
#!/usr/bin/perl
$_=q|osyrNewkecnaYhe.mlorsePptMskurj|;s;[NY.PM]; ;g;local$\=
qq$\n$;@pm=split//;while($NY=pop @pm){$pm.=$NY;$ny.=pop @pm}
$pm=join'',reverse($ny,$pm);open(NY,'>&STDOUT');print NY $pm
------------------------------
Date: Thu, 16 Oct 1997 16:58:58 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: Marilyn Loomis <marilyn.loomis@kla-tencor.com>
Subject: Re: Q: Perl Distribution?
Message-Id: <Pine.GSO.3.96.971016165733.23528C-100000@user2.teleport.com>
On Thu, 16 Oct 1997, Marilyn Loomis wrote:
> Is there a way to distribute my perl scripts to others without
> installing Perl on their machines?
No problem with distributing the scripts... But without Perl, it's not
likely that your friends will get them to do anything! :-)
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Fri, 17 Oct 1997 05:40:24 GMT
From: daryn@solamnia.demon.co.uk (Daryn Brightblade)
Subject: Q: Perl upload protocols
Message-Id: <877038024.17511.0.nnrp-06.c2de12b5@news.demon.co.uk>
Hey there..
I'm a newbie here so if I tread on any toes, I apologize..
I have a problem
I'm trying to upload a text file (fairly large) through perl into an
NT server directory
I've got perl running on the NT server and now i just need to upload a
text file thru the perl script into a temporary directory on the
server..
I've tried several scripts but they don't work completely..
please.. Any help.. I beg ya
Thank you, in advance.
Daryn Brightblade
Comrades in Arms, Brothers in Peace, the Clan Brightblade
http://www.solamnia.demon.co.uk/
------------------------------
Date: 17 Oct 1997 00:31:10 GMT
From: sduffy@nova.dreamscape.com (Steven Duffy)
Subject: qqq
Message-Id: <626bke$pd8$1@newsfeed.dreamscape.com>
--
---
Steven Duffy
Technical Support
Dreamscape Online
1-888-GET-1895
------------------------------
Date: Thu, 16 Oct 1997 14:11:31 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: Martin Gregory <mgregory@asc.sps.mot.com>
Subject: Re: Scope of LABELs
Message-Id: <Pine.GSO.3.96.971016140334.20497n-100000@usertest.teleport.com>
On 15 Oct 1997, Martin Gregory wrote:
> Is it documented anywhere what the scope of a LABEL identifier is?
Probably not. :-)
> In otherwords, where am I allowed to reuse a LABEL name again without
> coming to grief?
Here's the rule, as I understand it. If it's a loop-block label, inner
blocks will override outer ones. If it's a different label, it's kept in a
stack, added as you enter its scope and removed as you leave it. When
needed, Perl pops this stack, looking for the label; first found is used.
Having said that, here's the rule I use: Never the same label twice. :-)
Hope this helps!
--
Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
Ask me about Perl trainings!
------------------------------
Date: Thu, 16 Oct 1997 16:47:52 -0600
From: Bob Fawcett <bfawcett@myriad.com>
Subject: Re: sorting a hash
Message-Id: <34469997.B8110FED@myriad.com>
David Siebert wrote:
> I am trying to sort an array of keys to out put to a file.
> this does not work. What will?
> foreach $key sort((keys %myerror)) {print FILE "$key\t$value"}
There is probably a better way to do it (more efficient), but I always
just push each key of the hash onto an array then do my foreach on the
the array.
Bob Fawcett
------------------------------
Date: Thu, 16 Oct 1997 23:29:46 GMT
From: drummj@mail.mmc.org (Jeffrey Drumm)
Subject: Re: sorting a hash
Message-Id: <3446a01a.379073172@news.mmc.org>
On Thu, 16 Oct 1997 16:47:52 -0600, Bob Fawcett <bfawcett@myriad.com>
wrote:
>David Siebert wrote:
>
>> I am trying to sort an array of keys to out put to a file.
>> this does not work. What will?
>> foreach $key sort((keys %myerror)) {print FILE "$key\t$value"}
Unless you mean that you've got an array of hashes (as opposed to a
hash of key/value pairs) I think you want:
foreach $key (sort keys %myerror) {
print FILE "$key\t$myerror{$key}\n"
}
This is, of course, assuming that you wanted whatever $value
represented above to be the actual value of the hash element specified
by the key . . . (and, of course, that you wanted them tab separated,
one key/value pair per line of the file)
Get the FAQ. Your question and MANY others are answered quite handily
by:
http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html
;-)
>
>There is probably a better way to do it (more efficient), but I always
>just push each key of the hash onto an array then do my foreach on the
>the array.
>
>Bob Fawcett
But that doesn't get it sorted . . . unless you left out a step in
your explanation.
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center Information Services
420 Cumberland Ave, Portland, ME 04101
drummj@mail.mmc.org
------------------------------
Date: 16 Oct 1997 21:17:42 -0500
From: John Goerzen <jgoerzen+usenet@complete.org>
To: zawodny@hou.moc.com (Jeremy D. Zawodny)
Subject: Re: String manipulation in Perl
Message-Id: <8790vtgmk9.fsf@garfield.complete.org>
[ e-mail copy sent to Jeremy D. Zawodny ]
zawodny@hou.moc.com (Jeremy D. Zawodny) writes:
> Some more food for thought. Think about what you're trying to
> accomplish in a larger sense. Might there be a more "Perl Way" of
> doing it? Perhaps you could post some code or an idea of what
> functionality you're trying to implement.
Well, here's the project... I am working on a printer filter. I am
trying to decide what language to use -- C or Perl. I want to use
Perl because I could use the experience if nothing else.
Basically, here's what I will start it out as: read from stdin, write
to stdout. Check to make sure that certain characters do not get
through. If one of these characters appears on stdin, abort
processing and return an error code.
(ie, filter out most characters below 32 and above 127)
Problems: the input is not necessarily line-oriented. Slurping with
<> or so could end up using huge amounts of memory. So I can use read
or something, no problem. (I hope Perl has no problems with embedded
nulls like C sometimes does?)
Also.. It is hard to specify a "range" of characters, excluding some
certain specific ones, with regexps (unless I am missing some regexp
feature).
I am slightly concerned about speed, iterating over 5 meg files with a
regexp does not make me feel good, but this I will have to see about
once I try out a Perl program like this for myself.
Another possibility: instead of bombing on one of these bad
characters, just strip it out (maybe logging the occurance as well).
BTW, thanks to everyone for their very helpful posts and e-mails! I
have learned a lot of Perl from this group :-)
--
John Goerzen | Running Debian GNU/Linux (www.debian.org)
Custom Programming | Debian GNU/Linux is a free replacement for
jgoerzen@complete.org | DOS/Windows -- check it out at www.debian.org.
------------------------------
Date: 16 Oct 1997 07:01:33 -0500
From: John Goerzen <jgoerzen+usenet@complete.org>
Subject: Re: We're targets.
Message-Id: <87vhyxj4rm.fsf@garfield.complete.org>
Doug Seay <seay@absyss.fr> writes:
> The easiest thing to do is to "munge" your address to something
> invalid. Then whenever someone harvests your address, they just get a
> bunch of crap. Many people don't like munging (TomC being a well known
> case) because it cuts down on the ease of regular communication. It is
> one of those "personal choice" sorts of things. I don't like it, but I
> understand the frustration level caused by all this UBE. Also, this
> won't help against UBEers who already have your valid address.
This is a bad idea. It makes people that want to mail-reply to your
message go to lots of extra work. It makes people that want to send
you a curtesy copy of a post go to lots of extra work. It is, in
general, annoying.
Better: change your address to something else that is valid. For
instance, my address on news posts is listed as
jgoerzen+usenet@complete.org. With a sendmail configured with the
procmail feature and a working procmail, this makes it trivial to
automatically filter any messages to that address to a separate
folder. This helps keep spam out of the inbox. It also allows people
to reply to your posts without getting bounce messages. And you still
have these replies in a separate folder.
--
John Goerzen | Running Debian GNU/Linux (www.debian.org)
Custom Programming | Debian GNU/Linux is a free replacement for
jgoerzen@complete.org | DOS/Windows -- check it out at www.debian.org.
----------------------+----------------------------------------------
------------------------------
Date: Thu, 16 Oct 1997 21:22:56 GMT
From: faust@wwa.com (Faust Gertz)
Subject: Re: Web Programmer Wanted
Message-Id: <344681e7.7551473@news.wwa.com>
On Thu, 16 Oct 1997 13:29:06 -0700, Drake International
<b~johnston@rocketmail.com> wrote:
>I am looking for a Web Programmer in Vancouver.
> C++, Java Script and Perl
> 3 Yrs exp.
>Please e-mail b~johnston@rocketmail.com
>
>Barry Johnston
>IT Recruitment Consultant
>Drake International
Wo kann ich die Perl FAQ finden?
What is the likelihood of finding a "Web Programmer" residing in
Vancouver by posting to de.comp.lang.perl? What does this post have
to do with comp.lang.perl.tk? It probably doesn't have much to do
with comp.lang.perl.modules either. I ask once again, "Should we have
some official policy on job postings in the comp.lang.perl.*
hierarchy?"
immer fragen warum!
Faust Gertz
Philosopher at Large
------------------------------
Date: Thu, 16 Oct 1997 16:35:03 -0600
From: Bob Fawcett <bfawcett@myriad.com>
Subject: Re: Web Programmer Wanted
Message-Id: <34469696.A2D7FD19@myriad.com>
Faust Gertz wrote:
> On Thu, 16 Oct 1997 13:29:06 -0700, Drake International
> <b~johnston@rocketmail.com> wrote:
>
> >I am looking for a Web Programmer in Vancouver.
> > C++, Java Script and Perl
> > 3 Yrs exp.
> >Please e-mail b~johnston@rocketmail.com
> >
> >Barry Johnston
> >IT Recruitment Consultant
> >Drake International
>
> Wo kann ich die Perl FAQ finden?
>
> What is the likelihood of finding a "Web Programmer" residing in
> Vancouver by posting to de.comp.lang.perl? What does this post have
> to do with comp.lang.perl.tk? It probably doesn't have much to do
> with comp.lang.perl.modules either. I ask once again, "Should we have
> some official policy on job postings in the comp.lang.perl.*
> hierarchy?"
>
> immer fragen warum!
>
> Faust Gertz
> Philosopher at Large
I don't mind seeing how marketable my Perl skills are in a news group
dedicated to Perl. At least it isn't a Visual Basic job posting.
Bob Fawcett
------------------------------
Date: Thu, 16 Oct 1997 22:35:25 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Web Programmer Wanted
Message-Id: <tdm626.q9k.ln@localhost>
[ followups trimmed ]
Faust Gertz (faust@wwa.com) wrote:
: On Thu, 16 Oct 1997 13:29:06 -0700, Drake International
: <b~johnston@rocketmail.com> wrote:
: >I am looking for a Web Programmer in Vancouver.
: > C++, Java Script and Perl
: > 3 Yrs exp.
: >Please e-mail b~johnston@rocketmail.com
: >
: >Barry Johnston
: >IT Recruitment Consultant
: >Drake International
: Wo kann ich die Perl FAQ finden?
: What is the likelihood of finding a "Web Programmer" residing in
: Vancouver by posting to de.comp.lang.perl?
As a clueful headhunter would not have done this, we then infer...
: What does this post have
: to do with comp.lang.perl.tk?
: It probably doesn't have much to do
: with comp.lang.perl.modules either.
: I ask once again, "Should we have
: some official policy on job postings in the comp.lang.perl.*
: hierarchy?"
I don't mind seeing job postings, if they are really for Perl jobs.
But I don't like internet abusers, so I would prefer not to
see any more from Barry.
: immer fragen warum!
Are those curse words? (they ought to be ;-)
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 1188
**************************************
