[25669] in Perl-Users-Digest
Perl-Users Digest, Issue: 7910 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 29 12:32:02 2005
Date: Tue, 29 Mar 2005 09:31:54 -0800 (PST)
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, 29 Mar 2005 Volume: 10 Number: 7910
Today's topics:
Broken pipe problem? If so, why? (malgosia askanas)
Re: Broken pipe problem? If so, why? <No_4@dsl.pipex.com>
Re: Broken pipe problem? If so, why? xhoster@gmail.com
cgi.pm popup_menu define select width? <inetquestion@hotmail.com>
Re: cgi.pm popup_menu define select width? <noreply@gunnar.cc>
Re: cgi.pm popup_menu define select width? <inetquestion@hotmail.com>
Re: cgi.pm popup_menu define select width? <nobull@mail.com>
Re: cgi.pm popup_menu define select width? <noreply@gunnar.cc>
Re: cgi.pm popup_menu define select width? <nobody@dev.null>
Re: cgi.pm popup_menu define select width? <flavell@ph.gla.ac.uk>
Class instances with 'use overload' in a tied hash <guy_bolton-king@non.agilent.com>
Re: Class instances with 'use overload' in a tied hash <guy_bolton-king@non.agilent.com>
Re: Class instances with 'use overload' in a tied hash <nobull@mail.com>
Re: Class instances with 'use overload' in a tied hash <notvalid@email.com>
Re: Class instances with 'use overload' in a tied hash <guy_bolton-king@non.agilent.com>
Re: Distribution of modules, historically <mshaw@bangnetcom.com>
EARN CASH BY READING EMAILS. THIS REALLY WORKS I ALLREA <no@email.com>
Re: Error "Use of uninitialized value " <nobull@mail.com>
Re: Error "Use of uninitialized value " <nobull@mail.com>
FAQ . <comdog@panix.com>
Re: FAQ . <hendrik_maryns@despammed.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 28 Mar 2005 10:11:39 -0500
From: ma@panix.com (malgosia askanas)
Subject: Broken pipe problem? If so, why?
Message-Id: <d296rb$9dg$1@panix1.panix.com>
I have a mail-handling program written in Perl. It gets passed a mail message,
reads the header, does some processing, and exits. The code for reading
the header is:
$/ = ''; # paragraph mode
$header = <>;
I am invoking this program in a pipe from procmail. For some messages (I
believe, for very large ones) I get the message "Error while writing to
<progname>" in the procmail log. I would be inclined to believe that it's
a broken pipe problem, but if so, why does its occurrence depend on the
message size? The program reads only the header for _all_ messages,
independent of size - yet in a vast majority of cases, procmail does not
complain. Can you advise?
Many thanks in advance,
-malgosia
------------------------------
Date: Mon, 28 Mar 2005 16:33:43 +0100
From: Big and Blue <No_4@dsl.pipex.com>
Subject: Re: Broken pipe problem? If so, why?
Message-Id: <d5WdnZgafrBIvtXfRVnysw@pipex.net>
malgosia askanas wrote:
>
> $/ = ''; # paragraph mode
> $header = <>;
>
> I am invoking this program in a pipe from procmail. For some messages (I
> believe, for very large ones) I get the message "Error while writing to
> <progname>" in the procmail log. I would be inclined to believe that it's
> a broken pipe problem, but if so, why does its occurrence depend on the
> message size? The program reads only the header for _all_ messages,
> independent of size - yet in a vast majority of cases, procmail does not
> complain. Can you advise?
The fact that you "only" read the header is the problem (but reading
all of it is not necessarily the solution).
procmail is piping the message to you (can't you configure procmail
just to send teh header?). If the entire message is small enough to fit
into the buffer of a pipe (usually 8kB?) then it will write it all and
things are OK. If it is larger than this though a problem occurs - you
only read the start of the then close the pipe (by exiting). Since you
have closed the pipe while procmail still has it open *it* gets sent a SIGPIPE.
So, you have to look at the procmail config options and:
1) get it to only send headers - if possible only get it to send
information you are interested in.
2) tell it to ignore SIGPIPE if possible
if 2) is not possible then you should read *everything* (but just ignore
the parts aftre the bit you really want).
--
Just because I've written it doesn't mean that
either you or I have to believe it.
------------------------------
Date: 28 Mar 2005 15:41:26 GMT
From: xhoster@gmail.com
Subject: Re: Broken pipe problem? If so, why?
Message-Id: <20050328104126.068$Fh@newsreader.com>
ma@panix.com (malgosia askanas) wrote:
> I have a mail-handling program written in Perl. It gets passed a mail
> message, reads the header, does some processing, and exits. The code for
> reading the header is:
>
> $/ = ''; # paragraph mode
> $header = <>;
>
> I am invoking this program in a pipe from procmail. For some messages (I
> believe, for very large ones) I get the message "Error while writing to
> <progname>" in the procmail log. I would be inclined to believe that
> it's a broken pipe problem, but if so, why does its occurrence depend on
> the message size? The program reads only the header for _all_ messages,
> independent of size - yet in a vast majority of cases, procmail does not
> complain. Can you advise?
Since your Perl program is only reading the header, it must be terminating
while there is still stuff to be read. For short messages, all that stuff
to be read fits in the buffer, so the other end of the pipe doesn't notice.
But for large messages, when the Perl end of the pipe exits the other end
of the pipe gets upset because it is now trying to write to something that
no longer exists. Or something like that.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 27 Mar 2005 11:28:35 -0800
From: "inetquestion" <inetquestion@hotmail.com>
Subject: cgi.pm popup_menu define select width?
Message-Id: <1111951715.529081.315760@o13g2000cwo.googlegroups.com>
Is it possible to define the width of a select menu using cgi.pm such
as shown below?
TIA,
-Inet
<select name="myselect" class="textfield" width="130" style="width:
130px;">
<option></option>
<option></option>
<option></option>
<option></option>
<option></option>
</select>
------------------------------
Date: Sun, 27 Mar 2005 22:07:31 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <3aoifjF6b2qm7U1@individual.net>
inetquestion wrote:
> Is it possible to define the width of a select menu using cgi.pm such
> as shown below?
>
> <select name="myselect" class="textfield" width="130" style="width:
> 130px;">
CGI.pm seems to acknowledge an undocumented -width parameter. However,
if it ever was valid HTML to use the "width" attribute in "select"
elements, I suppose it's at least deprecated.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: 27 Mar 2005 12:56:15 -0800
From: "inetquestion" <inetquestion@hotmail.com>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <1111956975.433247.288610@l41g2000cwc.googlegroups.com>
the part I'm was referring to specifically is: style="width: 130px;"
as this sets the minimum width whereas the other specifies the maximum
width.
------------------------------
Date: Sun, 27 Mar 2005 21:08:39 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <d2771p$7vr$1@sun3.bham.ac.uk>
inetquestion wrote:
> the part I'm was referring to specifically is: style="width: 130px;"
What happened when you tried passing a style argument to popup_menu?
------------------------------
Date: Mon, 28 Mar 2005 01:54:09 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <3aovokF6d6u9kU1@individual.net>
inetquestion wrote:
> the part I'm was referring to specifically is: style="width: 130px;"
The -style parameter is described in the CGI.pm POD, and I couldn't
imagine that you asked hundreds of programmers for help to read the docs
for you.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sun, 27 Mar 2005 19:58:06 -0500
From: Andras Malatinszky <nobody@dev.null>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <DEI1e.74844$SF.36890@lakeread08>
Gunnar Hjalmarsson wrote:
> inetquestion wrote:
>
>> Is it possible to define the width of a select menu using cgi.pm such
>> as shown below?
>>
>> <select name="myselect" class="textfield" width="130" style="width:
>> 130px;">
>
>
> CGI.pm seems to acknowledge an undocumented -width parameter. However,
> if it ever was valid HTML to use the "width" attribute in "select"
> elements, I suppose it's at least deprecated.
>
In fact CGI.pm seems to tacitly accept most any parameter, presumably in
the spirit of flexibility. For instance,
print $q->popup_menu(-name=>'myselect', -foo=>'bar');
will generate
<select name="myselect" foo="bar">
</select>
So to produce what the OP is asking for you would want to do something like
print $q->popup_menu(-name=>'myselect', -class=>'textfield',
-width=>'130', -style=>'width: 130px;');
Specifying the width via CSS is valid, but "width" as an HTML attribute
for <SELECT> is totally bogus.
------------------------------
Date: Tue, 29 Mar 2005 17:43:29 +0100
From: "Alan J. Flavell" <flavell@ph.gla.ac.uk>
Subject: Re: cgi.pm popup_menu define select width?
Message-Id: <Pine.LNX.4.61.0503291740390.31261@ppepc56.ph.gla.ac.uk>
On Sun, 27 Mar 2005, Andras Malatinszky wrote:
> In fact CGI.pm seems to tacitly accept most any parameter,
> presumably in the spirit of flexibility. For instance,
>
> print $q->popup_menu(-name=>'myselect', -foo=>'bar');
>
> will generate
>
> <select name="myselect" foo="bar">
Indeed; and this is CGI.pm's trick for supporting attributes which
aren't explicitly known. But it means that acceptance by CGI.pm is
absolutely no guarantee of meaningfulness as far as HTML is concerned
(which I'm sure was the point you were intending to make here)
> Specifying the width via CSS is valid, but "width" as an HTML
> attribute for <SELECT> is totally bogus.
Completely OT for Perl, but google suggests
http://www.blooberry.com/indexdot/html/topics/selectwidth.htm
which looks quite a sensible analysis of the issue, it its way.
------------------------------
Date: Mon, 28 Mar 2005 17:36:09 +0100
From: Guy Bolton King <guy_bolton-king@non.agilent.com>
Subject: Class instances with 'use overload' in a tied hash
Message-Id: <1112027771.478383@cswreg.cos.agilent.com>
Hi,
I'm relatively new to the OO-features of perl, so I may have made an
obvious mistake in the following code, in which case I apologise for
wasting the group's time. I have a value-type class (Foo in the
example below) which overloads the comparison operator. sort() then
successfully uses the comparison operator when sorting a list of
instances obtained from the values() of a hash. However, if the class
instances are used as the values in a _tied_ hash, the overloaded
operator is no longer called, _unless_ values() is called before
calling the sort() function.
Have I made a mistake? Or is this something I shouldn't even attempt
in perl?
Thanks in advance,
Guy.
---snip!---
#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';
{
package Foo;
sub new {
my $self = bless({}, shift());
$self->{val} = shift();
return $self;
}
sub compare {
my ($self, $other) = @_;
return $self->{val} cmp $other->{val};
}
use overload
'cmp' => sub {
print "operator cmp\n";
return compare(@_);
},
'""' => sub {
printf "operator \"\" -> %s (%s)\n",
$_[0]->{val}, join(' ', caller());
return val(@_);
};
}
{
package FooHash;
sub TIEHASH { bless {}, $_[0] }
sub STORE {
printf "STORE(%s)\n", $_[1];
$_[0]->{$_[1]} = $_[2];
}
sub FETCH {
printf "FETCH(%s)\n", $_[1];
return $_[0]->{$_[1]};
}
sub FIRSTKEY {
print "FIRSTKEY\n";
keys %{$_[0]};
return $_[0]->NEXTKEY();
}
sub NEXTKEY {
my @result = each %{$_[0]};
print "NEXTKEY\n";
return wantarray ? @result : scalar(@result) ? $result[0] : undef;
}
sub EXISTS {
printf "EXISTS(%s)\n";
exists $_[0]->{$_[1]};
}
sub DELETE { delete $_[0]->{$_[1]} }
sub CLEAR {
printf "CLEAR\n";
%{$_[0]} = ()
}
sub SCALAR { scalar %{$_[0]} }
}
my %a = (a => Foo->new('a'), b => Foo->new('b'));
my %b;
tie(%b, "FooHash");
%b = %a;
my @a;
print "=== sort a\n";
@a = sort(values(%a));
printf "--> %s\n", join(' ', map { $_->val() } @a);
print "=== sort b\n";
@a = sort(values(%b));
printf "--> %s\n", join(' ', map { $_->val() } @a);
print "=== sort values b indirectly\n";
@a = values(%b);
@a = sort(@a);
printf "--> %s\n", join(' ', map { $_->val() } @a);
------------------------------
Date: Mon, 28 Mar 2005 17:39:36 +0100
From: Guy Bolton King <guy_bolton-king@non.agilent.com>
Subject: Re: Class instances with 'use overload' in a tied hash
Message-Id: <1112027976.573056@cswreg.cos.agilent.com>
Guy Bolton King wrote:
> Hi,
>
> I'm relatively new to the OO-features of perl, so I may have made an
> obvious mistake in the following code, in which case I apologise for
> wasting the group's time. I have a value-type class (Foo in the
> example below) which overloads the comparison operator. sort() then
> successfully uses the comparison operator when sorting a list of
> instances obtained from the values() of a hash. However, if the class
> instances are used as the values in a _tied_ hash, the overloaded
> operator is no longer called, _unless_ values() is called before
> calling the sort() function.
>
> Have I made a mistake? Or is this something I shouldn't even attempt
> in perl?
Yes, I've posted code that doesn't work. Working code attached.
---snip!---
#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';
{
package Foo;
sub new {
my $self = bless({}, shift());
$self->{val} = shift();
return $self;
}
sub compare {
my ($self, $other) = @_;
return $self->{val} cmp $other->{val};
}
sub val {
return $_[0]->{val};
}
use overload
'cmp' => sub {
print "operator cmp\n";
return compare(@_);
},
'""' => sub {
printf "operator \"\" -> %s (%s)\n",
$_[0]->{val}, join(' ', caller());
return val(@_);
};
}
{
package FooHash;
sub TIEHASH { bless {}, $_[0] }
sub STORE {
printf "STORE(%s)\n", $_[1];
$_[0]->{$_[1]} = $_[2];
}
sub FETCH {
printf "FETCH(%s)\n", $_[1];
return $_[0]->{$_[1]};
}
sub FIRSTKEY {
print "FIRSTKEY\n";
keys %{$_[0]};
return $_[0]->NEXTKEY();
}
sub NEXTKEY {
my @result = each %{$_[0]};
print "NEXTKEY\n";
return wantarray ? @result : scalar(@result) ? $result[0] : undef;
}
sub EXISTS {
printf "EXISTS(%s)\n";
exists $_[0]->{$_[1]};
}
sub DELETE { delete $_[0]->{$_[1]} }
sub CLEAR {
printf "CLEAR\n";
%{$_[0]} = ()
}
sub SCALAR { scalar %{$_[0]} }
}
my %a = (a => Foo->new('a'), b => Foo->new('b'));
my %b;
tie(%b, "FooHash");
%b = %a;
my @a;
print "=== sort a\n";
@a = sort(values(%a));
printf "--> %s\n", join(' ', map { $_->val() } @a);
print "=== sort b\n";
@a = sort(values(%b));
printf "--> %s\n", join(' ', map { $_->val() } @a);
print "=== sort values b indirectly\n";
@a = values(%b);
@a = sort(@a);
printf "--> %s\n", join(' ', map { $_->val() } @a);
------------------------------
Date: Mon, 28 Mar 2005 17:22:22 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: Class instances with 'use overload' in a tied hash
Message-Id: <d29e5h$a9e$1@sun3.bham.ac.uk>
Guy Bolton King wrote:
>>
>> I'm relatively new to the OO-features of perl, so I may have made an
>> obvious mistake in the following code, in which case I apologise for
>> wasting the group's time. I have a value-type class (Foo in the
>> example below) which overloads the comparison operator. sort() then
>> successfully uses the comparison operator when sorting a list of
>> instances obtained from the values() of a hash. However, if the class
>> instances are used as the values in a _tied_ hash, the overloaded
>> operator is no longer called, _unless_ values() is called before
>> calling the sort() function.
>>
>> Have I made a mistake? Or is this something I shouldn't even attempt
>> in perl?
>
>
> Yes, I've posted code that doesn't work. Working code attached.
>
> ---snip!---
Good illustration.
I was able to reproduce on 5.8.6.
I'm fairly sure you've found a bug in Perl.
------------------------------
Date: Mon, 28 Mar 2005 23:12:01 GMT
From: Ala Qumsieh <notvalid@email.com>
Subject: Re: Class instances with 'use overload' in a tied hash
Message-Id: <5b02e.2581$FN4.680@newssvr21.news.prodigy.com>
Brian McCauley wrote:
> I'm fairly sure you've found a bug in Perl.
I wonder if this is related to the nested sort bug:
http://rt.perl.org/rt3/Ticket/Display.html?id=7063
(you can login as guest/guest).
--Ala
------------------------------
Date: Tue, 29 Mar 2005 09:19:11 +0100
From: Guy Bolton King <guy_bolton-king@non.agilent.com>
Subject: Re: Class instances with 'use overload' in a tied hash
Message-Id: <1112084353.678843@cswreg.cos.agilent.com>
Ala Qumsieh wrote:
> Brian McCauley wrote:
>
>> I'm fairly sure you've found a bug in Perl.
>
>
> I wonder if this is related to the nested sort bug:
>
> http://rt.perl.org/rt3/Ticket/Display.html?id=7063
> (you can login as guest/guest).
Right, I hadn't thought to check perlbug. My bad. Could be related to
http://rt.perl.org/rt3/Ticket/Display.html?id=8136 (which seems to have
been thoroughly ignored, although I must admit that the usage there is
somewhat exotic).
Will submit bug, thanks all,
Guy.
------------------------------
Date: Fri, 25 Mar 2005 22:46:08 +0000 (UTC)
From: Mark Shaw <mshaw@bangnetcom.com>
Subject: Re: Distribution of modules, historically
Message-Id: <d224bg$7ji$6@reader1.panix.com>
Fabian Pilkowski <pilkowsk@informatik.uni-marburg.de> wrote:
> * Mark Shaw schrieb:
> > Is there a reference somewhere that lists which modules were
> > released with which versions of perl?
> Have a look at CPAN. Module::CoreList seems to be the one you (not?)
> searching for.
> http://search.cpan.org/~rclamp/Module-CoreList-1.98/lib/Module/CoreList.pm
Thank you, that's exactly what I need.
> > Specifically, I'm facing a situation where Date::Calc - used in a
> > script which I am responsible for maintaining - is not present at
> > a customer's site, and he is unwilling to obtain it.
> On my own system (Perl 5.8.6) the module Date::Calc isn't present.
> According to this, Module::CoreList should tell you that Date::Calc
> isn't a standard module yet.
Yes, that's correct. No wonder it's not at my customer's site.
--
Mark Shaw moc TOD liamg TA wahsnm
========================================================================
"The most exciting phrase to hear in science, the one that heralds new
discoveries, is not 'Eureka!' but 'That's funny....'" - Isaac Asimov
------------------------------
Date: Sun, 27 Mar 2005 09:29:41 GMT
From: "CHRIS" <no@email.com>
Subject: EARN CASH BY READING EMAILS. THIS REALLY WORKS I ALLREADY HAVE =?ISO-8859-1?Q?10=80?= IN 1 MONTH AND ITS GROWING FASTER AND FASTER!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Message-Id: <92v1e.453437$PH1.159526@amsnews05.chello.com>
http://www.smsprofit.nl/aanmeld.php?ref=78267
------------------------------
Date: Wed, 23 Mar 2005 08:12:57 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: Error "Use of uninitialized value "
Message-Id: <d1r83d$ldh$1@sun3.bham.ac.uk>
geek wrote:
> Hi all,
>
> I am getting the error "Use of uninitialized value" in the line "else {
> stat();}"
>
> Any help will be appreciated. Look below for the code .
As others have pointed out that line is not in the code.
I will however point out some other problems with your code.
> #########################################################
> sub stat {
It is generally a good idea to avoid using the names of Perl built-ins
for your subroutines.
> print header(), start_html("The Statistics for Administrator");
> open(fileHandle,"./outputFile") or die "The file cannot be opened";
You should include the error in the error message.
> my @fileData = <fileHandle>;
Why slurp?
> my $count1=0;
> my $count2=0;
> my $count3=0;
> my $count4=0;
> my $count5=0;
> my $count6=0;
> my $count7=0;
> my $count8=0;
> my $count9=0;
> my $countt=0;
Whenever you find yourself typing something like the above a big light
should go on in your mind and flash the word "agregate". It should burn
so brightly it causes you pain.
> # my @array;
> foreach my $word(@fileData){
> print "******$word";
> my @array=split(/ /, $word);
Why create a variable to only use it once?
> foreach my $element(@array){
> if($element eq "CS5375"){
> $count1++;
> }
> if($element eq "cd"){
> $count2++;
> }
> if($element eq "cp"){
> $count3++;
> }
> if($element eq "vim"){
> $count4++;
> }
> if($element eq "%ls-l"){
> $count5++;
> }
> if($element eq "man"){
> $count6++;
> }
> if($element eq "perl-v"){
> $count7++;
> }
> if($element eq "all"){
> $count8++;
> }
> if($element eq "finger"){
> $count9++;
> }
> if($element eq "ftp\n"){
> $countt++;
By now the light in your mind should burn so brightly that you are
writhing on the floor in pain.
my %count;
while (<fileHandle>) {
for ( split ) {
$count{$_}++
}
}
> # print "hello";
> }
> }
> }
>
> my $noLine=0;
> open( fileHandle,"<./outputFile");
> $noLine++ while <fileHandle>;
Oh my $DEITY! You both slurp the file and then also read it again!
my $noLine = @fileData;
Or if you deceided not to slurp then just put the $noLine++ into the
loop where you read the file the first time.
> print "Number of lines in the file is $noLine";
> my $noUsers= $noLine/2;
> print br;
> print "Number of users is $noUsers";
> print br;
> my $finalAvg=0;
> open(handGrade,"./gradeFile") or die "gradeFile cannot be opened";
> my @avgarr = <handGrade>;
> my $tmpAvg;
You are suffering from premature declaration. This variable is only used
within the loop body and does not need to carry a value forward from
one iteration to the next. This being the case it should be declared
within the loop body.
> foreach my $avg(@avgarr){
> $tmpAvg="$finalAvg"+"$avg";
The + operator works on numbers. Why are you forcing Perl to convert
from number to string and back again?
> $finalAvg=$tmpAvg/2;
Perl can use parenteses in arrithmetic expressions - no need for a
temporary variable.
$finalAvg=($finalAvg+$avg)/2;
> }
This is an interesting weighted average you are calculating.
Half the last grade plus a quarter of the penultimate plus an eighth of
the prepenultimate and so on.
Is that really what you wanted?
> print "The average is $finalAvg";
> print br;
> my $percentage1=($count1/$noUsers)*100;
Using a simple hash approach this becomes.
my $percentage1=($count1{CS5375}/$noUsers)*100;
------------------------------
Date: Wed, 23 Mar 2005 10:41:48 +0000
From: Brian McCauley <nobull@mail.com>
Subject: Re: Error "Use of uninitialized value "
Message-Id: <d1rgqf$pvq$1@sun3.bham.ac.uk>
Brian McCauley wrote:
> geek wrote:
>
>> I am getting the error "Use of uninitialized value" in the line "else {
>> stat();}"
>>
>> Any help will be appreciated. Look below for the code .
> I will however point out some other problems with your code.
[ snip large waste of my time ]
All I'm doing here is repeating the good advice already posted by others
because the OP started duplicate threads.
Please do not do that it is selfish.
If you really think your post has been lost (you should wait a few hours
at least) you should mention in your re-post that it is a re-post.
------------------------------
Date: Sun, 27 Mar 2005 17:03:01 +0000 (UTC)
From: PerlFAQ Server <comdog@panix.com>
Subject: FAQ .
Message-Id: <d26p05$9sc$1@reader1.panix.com>
This message is one of several periodic postings to comp.lang.perl.misc
intended to make it easier for perl programmers to find answers to
common questions. The core of this message represents an excerpt
from the documentation provided with Perl.
--------------------------------------------------------------------
.:
--------------------------------------------------------------------
Documents such as this have been called "Answers to Frequently
Asked Questions" or FAQ for short. They represent an important
part of the Usenet tradition. They serve to reduce the volume of
redundant traffic on a news group by providing quality answers to
questions that keep coming up.
If you are some how irritated by seeing these postings you are free
to ignore them or add the sender to your killfile. If you find
errors or other problems with these postings please send corrections
or comments to the posting email address or to the maintainers as
directed in the perlfaq manual page.
Note that the FAQ text posted by this server may have been modified
from that distributed in the stable Perl release. It may have been
edited to reflect the additions, changes and corrections provided
by respondents, reviewers, and critics to previous postings of
these FAQ. Complete text of these FAQ are available on request.
The perlfaq manual page contains the following copyright notice.
AUTHOR AND COPYRIGHT
Copyright (c) 1997-2002 Tom Christiansen and Nathan
Torkington, and other contributors as noted. All rights
reserved.
This posting is provided in the hope that it will be useful but
does not represent a commitment or contract of any kind on the part
of the contributers, authors or their agents.
------------------------------
Date: Sun, 27 Mar 2005 20:26:34 +0200
From: Hendrik Maryns <hendrik_maryns@despammed.com>
Subject: Re: FAQ .
Message-Id: <X7udnaRmTOZKZ9vfRVnyjg@scarlet.biz>
PerlFAQ Server schreef:
> This message is one of several periodic postings to comp.lang.perl.misc
> intended to make it easier for perl programmers to find answers to
> common questions. The core of this message represents an excerpt
> from the documentation provided with Perl.
>
> --------------------------------------------------------------------
>
> .:
>
>
>
> --------------------------------------------------------------------
Shouldn't that be :-) ?
H.
------------------------------
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 7910
***************************************
