[23474] in Perl-Users-Digest
Perl-Users Digest, Issue: 5688 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Oct 21 03:05:50 2003
Date: Tue, 21 Oct 2003 00:05:12 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 21 Oct 2003 Volume: 10 Number: 5688
Today's topics:
Re: C vs Perl <JULIANALBO@terra.es>
Directory Structure. <supergerbil@hot#mail.com>
Re: Help me with is code (Tad McClellan)
Re: Help me with is code (Tad McClellan)
Re: Help me with is code <no@no.no>
Re: Help me with is code (Tad McClellan)
Re: Help me with is code <kkeller-usenet@wombat.san-francisco.ca.us>
Re: How to propagate -w and use strict? (Tad McClellan)
Re: Mason pipeline style (ko)
Re: Odd Perl bitwise-AND & MySQL problem? <cmjensen@dohnut.org>
Re: Odd Perl bitwise-AND & MySQL problem? (Sam Holden)
Re: Odd Perl bitwise-AND & MySQL problem? (Tad McClellan)
Re: PAR and pp problem (The Mosquito ScriptKiddiot)
Re: PAR and pp problem <kalinaubears@iinet.net.au>
Re: PAR and pp problem (Sam Holden)
Re: regular expression question (The Mosquito ScriptKiddiot)
Setting config file using constant <tony@spamme.com>
Re: Zipping a folder and displaying the completion rate (Bill)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 21 Oct 2003 08:19:18 +0200
From: =?iso-8859-1?Q?Juli=E1n?= Albo <JULIANALBO@terra.es>
Subject: Re: C vs Perl
Message-Id: <3F94CFE6.ACE8FE5C@terra.es>
len v escribi=F3:
> > Yes, and I could implement a language called FoxTrot that would have =
the
> > following program:
> >
> > Do it
(...)
> I see your point and that is exactly what Perl is all about. If your
> FoxTrot implementation had something to offer the community then FoxTro=
t
> would be added to Perl.
Something like...?
#!/usr/bin/perl
use Bizarre::FoxTrot;
Do it;
Regards.
------------------------------
Date: Tue, 21 Oct 2003 05:47:00 GMT
From: alt255 <supergerbil@hot#mail.com>
Subject: Directory Structure.
Message-Id: <Xns941AE79237613alt255@68.12.19.6>
I am trying to install a perl/cgi webforum called WebAPP
I chmodded everything to the values listed in the docs
I checked with my sysadmin to make sure I had the files in
the right places eg. cgi-bin folder in correct loation
my site is alt255.blackangel.net which is in truth
www.blackangel.net/~alt255/ the problem is when I run the
install.cgi from alt255.blackangel.net it says file not found
but if I run it from www.blackangel.net/~alt255 it works, kinda
it runs but tries to get it's resources /images etc from
www.blackangel.net/images instead of ~alt255/images it's not
just the images it's everything and I don't yet know enough about the
software to just kludge my way thru it, so I am looking for a way
to use the alt255.blackangel.net/ instead of www.blackangel.net/~alt255/
I know this is rambling, but that's just the way I am.
any help/advice would be appreciated
--
---------------------
alt255.blackangel.net
---------------------
The Almighty Tallest.
---------------------
------------------------------
Date: Mon, 20 Oct 2003 22:52:21 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Help me with is code
Message-Id: <slrnbp9bbl.kul.tadmc@magna.augustmail.com>
Public Interest <no@no.no> wrote:
>>
>> > I can put whatever address here.
>>
>>
>> So long then.
> Do you expect anyone to post a real email here to receive spams?
No.
I didn't say don't munge.
You _could_ have munged without inspiring killfiling...
Lots of email will go to the address you post with.
You posted with the address of the "hated broker", so you are
causing _them_ to get lots of email.
You have launched a DOS attack of sorts.
Munge without damaging others, or don't munge.
http://members.aol.com/emailfaq/mungfaq.html#how-not-mung
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 20 Oct 2003 23:40:38 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Help me with is code
Message-Id: <slrnbp9e66.kvt.tadmc@magna.augustmail.com>
Tom <tom@nosleep.net> wrote:
> I'll answer your email.
Usenet is not email.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 21 Oct 2003 05:16:33 GMT
From: "Public Interest" <no@no.no>
Subject: Re: Help me with is code
Message-Id: <Ri3lb.187393$0v4.14487583@bgtnsc04-news.ops.worldnet.att.net>
"Tad McClellan" <tadmc@augustmail.com> дÈëÓʼþ
news:slrnbp9bbl.kul.tadmc@magna.augustmail.com...
> Public Interest <no@no.no> wrote:
> >>
> >> > I can put whatever address here.
> >>
> >>
> >> So long then.
>
>
> > Do you expect anyone to post a real email here to receive spams?
>
>
> No.
>
> I didn't say don't munge.
>
> You _could_ have munged without inspiring killfiling...
>
OK, I have changed my email to a non-existance email
>
>
> Lots of email will go to the address you post with.
>
That was not the initial intension. I was using the email addess; @ or
_@_.__, but the newsgroup blocks such address now, so I grabed a email on a
page I was just watching, without puting much thought on it, knowing I don't
like them. Usually, I will use billgates@microsoft.com
something@whitehouse.gov
> You posted with the address of the "hated broker", so you are
> causing _them_ to get lots of email.
Talking about spam, Do you know SPAM can be easily stoped with a 100% rate?
I designed the 2 systems which can do this.
System 1, why there are fewer postal mail spam than email spam? Because
postage is not free. This can be done with the sender pays 1c to the
receiver to receive the money/credit for reading. In a personal world,
people send to and receive equal number of mails form friends, so it
balances out. It is like some verifying system, which is currently done by
some other system without much success.
System 2. all bulk non spam mailers are business/org related, so they must
afford a hosting server. Put the message on a webserver, and when a mail
server receives the bulk, it will first go to the url within the email to
compare the document, If 90% matchs, then the server pass the mail. If it is
still a spam, the hosting will be shut-off, or the ower will pay.
>
> You have launched a DOS attack of sorts.
>
That was my worries. I don't want to bring any harm to anyone. If it is
illegal, then I will stop.
> Munge without damaging others, or don't munge.
>
Ok, I got it and will follow. As my name, public interest, I want to help
the people by bring the cap of the poor and rich smaller. I want to be
educated and educating.
------------------------------
Date: Tue, 21 Oct 2003 00:25:09 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Help me with is code
Message-Id: <slrnbp9gpl.l7r.tadmc@magna.augustmail.com>
Public Interest <no@no.no> wrote:
> "Tad McClellan" <tadmc@augustmail.com> дÈëÓʼþ
> news:slrnbp9bbl.kul.tadmc@magna.augustmail.com...
>> Public Interest <no@no.no> wrote:
>> > Do you expect anyone to post a real email here to receive spams?
1. You must munge so you will not get a lot of spam.
> Talking about spam, Do you know SPAM can be easily stoped with a 100% rate?
> I designed the 2 systems which can do this.
2. You do not get any spam due to your filters.
So why is it that you must munge?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 20 Oct 2003 23:19:13 -0700
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: Help me with is code
Message-Id: <15j2nb.8d5.ln@goaway.wombat.san-francisco.ca.us>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
On 2003-10-21, Public Interest <no@no.no> wrote:
>
> Talking about spam, Do you know SPAM can be easily stoped with a 100% rate?
> I designed the 2 systems which can do this.
You did, eh?
> System 1, why there are fewer postal mail spam than email spam? Because
> postage is not free. This can be done with the sender pays 1c to the
> receiver to receive the money/credit for reading. In a personal world,
> people send to and receive equal number of mails form friends, so it
> balances out. It is like some verifying system, which is currently done by
> some other system without much success.
Uh-huh. How does payment change hands?
> System 2. all bulk non spam mailers are business/org related, so they must
> afford a hosting server. Put the message on a webserver, and when a mail
> server receives the bulk, it will first go to the url within the email to
> compare the document, If 90% matchs, then the server pass the mail. If it is
> still a spam, the hosting will be shut-off, or the ower will pay.
Pay whom? And can't bulk spam mailers afford a hosting server, too?
Considering how you can't even articulate clearly your system that stops
spam with a 100% rate, I'm not sure how you expect anyone to believe
that your system could ever work, especially since you haven't posted
any code (or links to code) for your alleged system.
> Ok, I got it and will follow. As my name, public interest, I want to help
> the people by bring the cap of the poor and rich smaller. I want to be
> educated and educating.
You say so, but you still haven't fixed your From: email address.
- --keith
- --
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://wombat.san-francisco.ca.us/cgi-bin/fom
-----BEGIN xxx SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: For info see http://www.gnupg.org
iEYEARECAAYFAj+Uz94ACgkQhVcNCxZ5ID8J0QCeLfAooSOgNTiMfC8TEorrLLv8
xAgAn2o++PJ2/f1aPZe4+RkVbcYM55Fv
=5v98
-----END PGP SIGNATURE-----
------------------------------
Date: Mon, 20 Oct 2003 22:50:23 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: How to propagate -w and use strict?
Message-Id: <slrnbp9b7v.kul.tadmc@magna.augustmail.com>
Steve Lidie <lusol@Dragonfly.cc.lehigh.edu> wrote:
> but was misled by testing only using a "used once" error.
^^^^^
You mean a "used once" _warning_.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 20 Oct 2003 22:18:58 -0700
From: kuujinbo@hotmail.com (ko)
Subject: Re: Mason pipeline style
Message-Id: <92d64088.0310202118.2c3a16@posting.google.com>
Matija Papec <perl@my-header.org> wrote in message news:<k4h8pv02bqpnp47poifo3oqp41msvskpev@4ax.com>...
> http://www.perl.com/lpt/a/2001/08/21/templating.html
> >While the documentation mostly demonstrates a callback execution model, it is possible to use Mason in a pipeline style.
>
> I would like to use Mason in pipeline style like described in article
> (templates are strictly separated from code). Can someone show such examples
> with Mason? Or should I consider Template Toolkit? :)
> tia!
Don't know if you already know about this site, but have you looked here?
http://www.masonbook.com/
HTH - keith
------------------------------
Date: Tue, 21 Oct 2003 04:39:53 GMT
From: dohnut <cmjensen@dohnut.org>
Subject: Re: Odd Perl bitwise-AND & MySQL problem?
Message-Id: <oprxdlz8bzmg5y0u@news.easynews.com>
Sam,
Thanks for the feedback. I think we've got it solved. I really should
just start reading these groups instead of just showing up when I have
problems, I may learn something. :)
>> my @dat = &GetHostStatus( $_ );
>
> Why are you using the & there?
Ok, I'll admit it, I'm an armchair perl programmer. I'm a long-time C
programmer professionally, but I use perl quite a bit for web scripting and
what not. So, with the disclaimer out of the way, may I ask, "What did I
mess up this time?" ;) I'm assuming my implementation is not ideal, but
here's why I do/did it. 1) It's how I learned -- subroutines begin with an
&. 2) It helps me visually identify subroutines (ok, that's kind of weak).
I know I've seen it left off, but I never explored the how and why. So,
tell me.. why? :)
--
Using M2, Opera's revolutionary e-mail client: http://www.opera.com/m2/
------------------------------
Date: 21 Oct 2003 05:11:41 GMT
From: sholden@flexal.cs.usyd.edu.au (Sam Holden)
Subject: Re: Odd Perl bitwise-AND & MySQL problem?
Message-Id: <slrnbp9g0d.sjq.sholden@flexal.cs.usyd.edu.au>
On Tue, 21 Oct 2003 04:39:53 GMT, dohnut <cmjensen@dohnut.org> wrote:
> Sam,
>
> Thanks for the feedback. I think we've got it solved. I really should
> just start reading these groups instead of just showing up when I have
> problems, I may learn something. :)
>
>>> my @dat = &GetHostStatus( $_ );
>>
>> Why are you using the & there?
>
> Ok, I'll admit it, I'm an armchair perl programmer. I'm a long-time C
> programmer professionally, but I use perl quite a bit for web scripting and
> what not. So, with the disclaimer out of the way, may I ask, "What did I
> mess up this time?" ;) I'm assuming my implementation is not ideal, but
> here's why I do/did it. 1) It's how I learned -- subroutines begin with an
> &. 2) It helps me visually identify subroutines (ok, that's kind of weak).
> I know I've seen it left off, but I never explored the how and why. So,
> tell me.. why? :)
See the documentation in 'perldoc perlsub'.
or the FAQ:
"What's the difference between calling a function as &foo
and foo()?"
Findable with:
'perldoc -q "&"'
Which also find the answer to your previous question, which I didn't
realise was a FAQ. If I had I would have provided a pointer in my
original reply, mea culpa...
In a nutshell, it disables prototypes. You didn't have any
prototypes so that doesn't matter so much, but turning off a
mechanism for finding errors for no real benefit is silly, in the
general case.
--
Sam Holden
------------------------------
Date: Tue, 21 Oct 2003 00:29:17 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Odd Perl bitwise-AND & MySQL problem?
Message-Id: <slrnbp9h1d.l7r.tadmc@magna.augustmail.com>
[ I can't figure out how to repair the attributions.
Please quote followups properly in the future.
]
dohnut <cmjensen@dohnut.org> wrote:
>>> my @dat = &GetHostStatus( $_ );
>>
>> Why are you using the & there?
>
> So, with the disclaimer out of the way, may I ask, "What did I
> mess up this time?" ;)
Using subroutines without reading the docs for subroutines.
> I know I've seen it left off, but I never explored the how and why. So,
> tell me.. why? :)
Subroutines in Perl are documented in:
perldoc perlsub
...
&NAME(LIST); # Circumvent prototypes.
...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 21 Oct 2003 05:12:48 GMT
From: anotherway83@aol.comnospam (The Mosquito ScriptKiddiot)
Subject: Re: PAR and pp problem
Message-Id: <20031021011248.28259.00000890@mb-m12.aol.com>
IMO the executables par produces are waaay too big
--The Mosquito Scriptkiddiot.
"Those who dance are often considered crazy by those who can't hear the music"
------------------------------
Date: Tue, 21 Oct 2003 16:23:25 +1000
From: Sisyphus <kalinaubears@iinet.net.au>
Subject: Re: PAR and pp problem
Message-Id: <3f94d195$0$23590$5a62ac22@freenews.iinet.net.au>
The Mosquito ScriptKiddiot wrote:
> IMO the executables par produces are waaay too big
>
>
> --The Mosquito Scriptkiddiot.
> "Those who dance are often considered crazy by those who can't hear the music"
With faster internet connections and larger hard drives the size thing
is not always a major concern. And par is just so convenient (when it
works :-)
It just needs the right marketing:
"Folks, why settle for cheap lightweight imitations when my par-built
executable (25 times bigger, but only double the price) does exactly the
same job .... with *real* grunt!!"
Cheers,
Rob
--
To reply by email u have to take out the u in kalinaubears.
------------------------------
Date: 21 Oct 2003 07:01:37 GMT
From: sholden@flexal.cs.usyd.edu.au (Sam Holden)
Subject: Re: PAR and pp problem
Message-Id: <slrnbp9meh.tvo.sholden@flexal.cs.usyd.edu.au>
On 21 Oct 2003 05:12:48 GMT,
The Mosquito ScriptKiddiot <anotherway83@aol.comnospam> wrote:
> IMO the executables par produces are waaay too big
Feel free to fix that and submit a patch.
--
Sam Holden
------------------------------
Date: 21 Oct 2003 05:15:10 GMT
From: anotherway83@aol.comnospam (The Mosquito ScriptKiddiot)
Subject: Re: regular expression question
Message-Id: <20031021011510.28259.00000891@mb-m12.aol.com>
>\L means: lowercase what follows, until the end of the string, or \E,
>whatever comes first.
>\U means: lowercase what follows, until the end of the string, or \E,
>whatever comes first.
u mean *upper*case for \U...=)
--The Mosquito Scriptkiddiot.
"Those who dance are often considered crazy by those who can't hear the music"
------------------------------
Date: Tue, 21 Oct 2003 15:48:50 +0900
From: Tony <tony@spamme.com>
Subject: Setting config file using constant
Message-Id: <20031021154850.63746a82.tony@spamme.com>
Hi,
I try to set a config file using constant. I put all the configuration in
Package/Config.pm as constant, and other program can get this
configuration by use Package::Config. It looks like this:
$ cat /var/www/lib/Package/Config.pm
package Package::Config;
use strict;
use constant ADMIN_NAME => 'My Name';
1;
$ cat /var/www/lib/Package/test.pl
#!/usr/bin/perl
use strict;
use lib "/var/www/lib";
use Package::Config;
print "Admin Name: " . $Package::Config::ADMIN_NAME . "\n";
Why this doesn't work? Please help, thanks very much.
Tony.
------------------------------
Date: 20 Oct 2003 21:18:57 -0700
From: wherrera@lynxview.com (Bill)
Subject: Re: Zipping a folder and displaying the completion rate
Message-Id: <239ce42f.0310202018.6847d71d@posting.google.com>
"Just in" <goth1938@hotmail.com> wrote in message news:<bn1p5j$ml4$1@news01.intel.com>...
> I'm using Archive::Zip and Archive::Zip::Tree to zip a hefty folder, and its
> sub folders. What I'd like to do is display how much has been done.
>
> Since perl executes line by line I was wondering how to display the
> percentage completed. I mean nothing is going to execute until these lines
> get done:
>
> die "Write error to $ZipFile" if $Zip->addTree($ServerDir) != AZ_OK;
>
Take a look at $Zip->addTreeMatching; use the optional subroutine to
add the file size to a counter, and display it. Displaying all that
will slow things down a lot of course.
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.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 V10 Issue 5688
***************************************
