[25074] in Perl-Users-Digest
Perl-Users Digest, Issue: 7324 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 27 18:05:55 2004
Date: Wed, 27 Oct 2004 15: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 Wed, 27 Oct 2004 Volume: 10 Number: 7324
Today's topics:
A file open and close that doesnt modify a timestamp (gumby)
Am *I* allowed to make a suggestion for PG <nospam@nospam.com>
Re: Am *I* allowed to make a suggestion for PG <lwt0301@bellsouth.net>
Re: Am *I* allowed to make a suggestion for PG <uguttman@athenahealth.com>
Re: Am *I* allowed to make a suggestion for PG <mjcarman@mchsi.com>
Re: Am *I* allowed to make a suggestion for PG <nospam@nospam.com>
Re: Am *I* allowed to make a suggestion for PG <abigail@abigail.nl>
Re: Anyone running MimeDefang on 4.x had problems with (Peter Conrey)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Oct 2004 13:14:42 -0700
From: georgeziv@hotmail.com (gumby)
Subject: A file open and close that doesnt modify a timestamp
Message-Id: <878baabf.0410271214.698835e7@posting.google.com>
I need to be able to open a file, read a file, then close a file with
out perl rewriting the TimeStamp on the file. I was able to do this
in C++ but not perl, and currently we are rewriting our old C code to
perl.
Here is what i am using currently
unless(open FILE, $fileName)
{
#here i pop an TK error window
}
while(<FILE>)
{
#Read and process the information so i can display it
}
close FILE;
I have looked into, since i already detect the timeStamp on the file,
keeping that timeStamp in memory then when i close the file using
utime to rewrite the Timestamp. I havent run any tests to see how
well that would work yet. Was just wondering if someone else has had
the same issue(I didnt see anything in the perldoc).
------------------------------
Date: Wed, 27 Oct 2004 14:25:11 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Am *I* allowed to make a suggestion for PG
Message-Id: <1098901554.932673@nntp.acecape.com>
Am new here, am new at Perl, am new at the rules, etc. And some
of you won't ever read this, but hopefully enough will. As well please
try and read this as neutral, and not a continuation of all the back and
forth going on.
You really should add a "Take it outside" line to the "Posting Guidelines
for comp.lang.perl.misc" . I have noticed that with the exception of very
few people you "all" make noise. And let me tell you, someone not
observing your "guidelines" is not an excuse for insiders to make noise.
Yeah, I see the noise ratio level, but a lot of you are just as guilty as
the
newbies. You answer back angry, you answer back with judgements.
And in return the people do the same to you, and it never ends. I am
not exclusing myself from this. One person has to be the less of the
"stubborn" mule and stop the cycle. And as I said, very few of you do.
Within some threads I see you doing it to each other as well!
Please don't just point the finger at the newcomer who hasn't followed
your rules! It takes 2 to tango, and 2 or more to make noise. It's on
both sides of the fence! Nor does the cry; "We answer negatively to
protect the guidelines!", justify a thing. When one of your very own
responds to:
Post> I want to be
Post> able to make sure that web page comes up
Post> and that we can navagate
Post> around the pages.
with:
Answer> Type its URL into the little box at the top of the browser window...
Answer> ... then click on stuff.
you are not only feeding the cycle, but you are asking for more noise.
There are an exceptional few who just somehow are able to not do it.
Sinan is one. He has no love for me we know, but he still has answered
one or two of my posts, and for the most part keeps out of the other stuff.
And there are one or two people who just answer the question and move on.
But how many of these threads are now polluted with 95% unnecessary posts.
What good are these threads to people who come in to look randomly read
as many threads as possible?
I have "zero" idea how groups are created, but if it can be done, can't
someone
make a "PUBLIC.perl.misc. type group? And when you want to snipe at
each other you "take it outside" and keep this group clean, and technical
as you wish?
Or just train yourself to completly NOT respond to the "emotional" posts, or
repsond emotionally and the noise will trickle down to a low hum stop! It's
either
that or live in a moderated group only.
Anyway, that's my thought/recommendation, you may do with it as you like...
daniel
------------------------------
Date: Wed, 27 Oct 2004 15:05:58 -0400
From: Laura <lwt0301@bellsouth.net>
Subject: Re: Am *I* allowed to make a suggestion for PG
Message-Id: <10nvsirfllic14c@news.supernews.com>
>
> Or just train yourself to completly NOT respond to the "emotional" posts,
> or
> repsond emotionally and the noise will trickle down to a low hum stop!
> It's either
> that or live in a moderated group only.
>
> Anyway, that's my thought/recommendation, you may do with it as you
> like...
>
> daniel
How about standard keywords for header for easier parsing. Like this:
Re: Am *I* allowed to make a suggestion for PG FLAME
Re: Am *I* allowed to make a suggestion for PG HELPUL_RESPONSE
Re: Am *I* allowed to make a suggestion for PG NEWBIE_TRYING_TO_HELP
Re: Am *I* allowed to make a suggestion for PG LOOK_AT_THE_FAQ
Re: Am *I* allowed to make a suggestion for PG LOOK_AT_DOCS
Re: Am *I* allowed to make a suggestion for PG SPOONFEED
just agree on standard keywords like this and when a user posts a homework
question, they can ignore FLAME, and LOOK_AT_DOCS and go right to
SPOONFEED.
or if you just want to fight, just read the FLAMEs.
It would be nice if people were nicer to people. I mean, this isn't like C
or anything. Not that I'm putting Perl down. If this were a PHP group and
I was an invested user, I would be begging on my hands and knees for new
people to learn the language and use it so it doesn't just die out and
leave me an 'expert' of a dead language. Perl is good for text processing,
like web pages and stuff, but you'll never buy a toaster oven controlled by
a Perl program. Of course, the web thing will be dead when html is gone
and everything online is graphics based. Then we'll all wish we didn't
waste our time reading hard books instead of getting a certificate signed
by Bill Gates.
------------------------------
Date: Wed, 27 Oct 2004 15:44:26 -0400
From: Uri Guttman <uguttman@athenahealth.com>
Subject: Re: Am *I* allowed to make a suggestion for PG
Message-Id: <m3u0sgx7xh.fsf@linux.local>
>>>>> "L" == Laura <lwt0301@bellsouth.net> writes:
L> It would be nice if people were nicer to people. I mean, this
L> isn't like C or anything. Not that I'm putting Perl down. If this
L> were a PHP group and I was an invested user, I would be begging on
L> my hands and knees for new people to learn the language and use it
L> so it doesn't just die out and leave me an 'expert' of a dead
L> language. Perl is good for text processing, like web pages and
L> stuff, but you'll never buy a toaster oven controlled by a Perl
L> program. Of course, the web thing will be dead when html is gone
L> and everything online is graphics based. Then we'll all wish we
L> didn't waste our time reading hard books instead of getting a
L> certificate signed by Bill Gates.
you have yet to do anything here but insult perl. you have no clue as to
the many uses it has beyond the web and text processing. you lack of
clue about perl code and it uses is very strong. please bottle it and do
learn php and hang out there.
uri
------------------------------
Date: Wed, 27 Oct 2004 15:22:45 -0500
From: Michael Carman <mjcarman@mchsi.com>
Subject: Re: Am *I* allowed to make a suggestion for PG
Message-Id: <clp02t$9462@onews.rockwellcollins.com>
daniel kaplan wrote:
> Am new here, am new at Perl, am new at the rules, etc.
...and hardly the first "newcomer" to feel that this newsgroup is too
"hostile" and needs to be reformed.
> I have "zero" idea how groups are created, but if it can be done,
> can't someone make a "PUBLIC.perl.misc. type group? And when you
> want to snipe at each other you "take it outside" and keep this group
> clean, and technical as you wish?
That won't work (for numerous reasons). The root problem is that people
come into a community (this ng) that has it's own culture and start to
interact without bothering to learn the culture first.
The secondary problem (IMHO) is that the people who answer questions in
this newsgroup tend to be blunt. Answers are useful and accurate but
brief and to the point. There's not a lot of extra warm fuzzy verbage.
If you aren't used to it, it comes across as rudeness, but it isn't
intended as such. (The true rudeness is going into someone else's
community and refusing to adhere to their rules of conduct.)
The first offense is usually corrected without any animosity but because
the response was terse the person responded to feels offended and starts
to bitch about it, which of course sets off the regulars and chaos ensues.
Once you learn the rules, this is a wonderfully helpful and perfectly
freindly place.
-mjc
------------------------------
Date: Wed, 27 Oct 2004 17:33:48 -0400
From: "daniel kaplan" <nospam@nospam.com>
Subject: Re: Am *I* allowed to make a suggestion for PG
Message-Id: <1098912875.405111@nntp.acecape.com>
"Michael Carman" <mjcarman@mchsi.com> wrote in message
news:clp02t$9462@onews.rockwellcollins.com...
> The first offense is usually corrected without any animosity but because
> the response was terse the person responded to feels offended and starts
> to bitch about it, which of course sets off the regulars and chaos ensues.
>
> Once you learn the rules, this is a wonderfully helpful and perfectly
> freindly place.
my sincere response is, if the regulars know the rules, and know what
happens next , shouldn't they lead the way via example?
>this is a wonderfully helpful and perfectly
> freindly place.
i whole heartedly agree...on the helpful side, have gotten alot, but i have
had to sift through a lot of garbage at times...as i am sure others as well
------------------------------
Date: 27 Oct 2004 21:43:16 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: Am *I* allowed to make a suggestion for PG
Message-Id: <slrnco05jk.3ac.abigail@alexandra.abigail.nl>
Uri Guttman (uguttman@athenahealth.com) wrote on MMMMLXXV September
MCMXCIII in <URL:news:m3u0sgx7xh.fsf@linux.local>:
__ >>>>> "L" == Laura <lwt0301@bellsouth.net> writes:
__
__
__ L> It would be nice if people were nicer to people. I mean, this
__ L> isn't like C or anything. Not that I'm putting Perl down. If this
__ L> were a PHP group and I was an invested user, I would be begging on
__ L> my hands and knees for new people to learn the language and use it
__ L> so it doesn't just die out and leave me an 'expert' of a dead
__ L> language. Perl is good for text processing, like web pages and
__ L> stuff, but you'll never buy a toaster oven controlled by a Perl
__ L> program. Of course, the web thing will be dead when html is gone
__ L> and everything online is graphics based. Then we'll all wish we
__ L> didn't waste our time reading hard books instead of getting a
__ L> certificate signed by Bill Gates.
__
__ you have yet to do anything here but insult perl. you have no clue as to
__ the many uses it has beyond the web and text processing. you lack of
__ clue about perl code and it uses is very strong. please bottle it and do
__ learn php and hang out there.
+-------------------+ .:\:\:/:/:.
| PLEASE DO NOT | :.:\:\:/:/:.:
| FEED THE TROLLS | :=.' - - '.=:
| | '=(\ 9 9 /)='
| Thank you, | ( (_) )
| Management | /`-vvv-'\
+-------------------+ / \
| | @@@ / /|,,,,,|\ \
| | @@@ /_// /^\ \\_\
@x@@x@ | | |/ WW( ( ) )WW
\||||/ | | \| __\,,\ /,,/__
\||/ | | | (______Y______)
/\/\/\/\/\/\/\/\//\/\\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
==================================================================
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: 27 Oct 2004 11:22:30 -0700
From: pfconrey@hotmail.com (Peter Conrey)
Subject: Re: Anyone running MimeDefang on 4.x had problems with p5-MIME-Tools?
Message-Id: <9311c231.0410271022.387b1664@posting.google.com>
Jim Hatfield <subscriber@insignia.com> wrote in message news:<1096309405.00139983.1096296603@10.7.7.3>...
> I recently portupgraded p5-MIME-Tools on a 4.x based test email
> gateway and now MIMEDefang isn't happy:
>
> >Sep 27 12:09:46 oban mimedefang-multiplexor[200]: Slave 0 stderr:
Can't locate object method "SWASHNEW" via package "utf8" (perhaps you
forgot to load "utf8"?) at
/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm line 362.
Compilation failed in require at
/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152. BEGIN
failed--compilation aborted at
/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152.
Compilation failed in require at /usr/local/bin/mimedefang.pl line
154. BEGIN failed--compilation aborted at /usr/local/bin/mimedefang.pl
line 154.
>
> The weird thing is that line 362 of Filer.pm is this:
>
> >return 1 if ($name =~ /((?:[\[\]\\\/\<\>\|\?\*\:\"]|\p{IsCntrl}))/); ### path or special characters
>
> which confuses me immensely since I have no idea what SWASHNEW is!
>
> jim
Jim,
Looks like it has nothing to do with MIME tools, but rather a problem
with perl itself. I get the same error on RedHat Linux:
Non-db error in Stay.pl: Can't locate object method "SWASHNEW" via
package "utf8" (perhaps you forgot t
o load "utf8"?) at /hilton/lib/perl5/site_perl/gpm/promo/Fetch.pm line
229.
at the following statement:
my $property = uc($args{Property});
If anyone has an idea how to fix this, please let us know.
------------------------------
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 7324
***************************************
