[28535] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 9899 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 27 18:05:51 2006

Date: Fri, 27 Oct 2006 15:05:10 -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           Fri, 27 Oct 2006     Volume: 10 Number: 9899

Today's topics:
    Re: activestate perl via shell() on XP, module location <brian.helterline@hp.com>
    Re: Encoding problem: Rsquo to a with a hat <afrinspray@gmail.com>
    Re: Encoding problem: Rsquo to a with a hat <trwww@sbcglobal.net>
    Re: FAQ 4.29 How can I count the number of occurrences  <brian.d.foy@gmail.com>
    Re: FAQ 4.29 How can I count the number of occurrences  <tadmc@augustmail.com>
        file convesrions <shashichinnakar@gmail.com>
        file convesrions <shashichinnakar@gmail.com>
    Re: file convesrions <glex_no-spam@qwest-spam-no.invalid>
    Re: file convesrions <benmorrow@tiscali.co.uk>
    Re: file convesrions <tadmc@augustmail.com>
    Re: file convesrions <tadmc@augustmail.com>
        Net::Telnet, wrong prompt, user not needed only passwor <georg.heiss@gmx.de>
        Net::Telnet, wrong prompt, user not needed only passwor <georg.heiss@gmx.de>
    Re: Net::Telnet, wrong prompt, user not needed only pas <glex_no-spam@qwest-spam-no.invalid>
    Re: Net::Telnet, wrong prompt, user not needed only pas <DJStunks@gmail.com>
    Re: Net::Telnet, wrong prompt, user not needed only pas <georg.heiss@gmx.de>
    Re: Net::Telnet, wrong prompt, user not needed only pas <georg.heiss@gmx.de>
        perl program for clusters <usaims@yahoo.com>
    Re: Reducing file length in Perl? <nospam@thanksanyway.org>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Fri, 27 Oct 2006 19:47:10 GMT
From: Brian Helterline <brian.helterline@hp.com>
Subject: Re: activestate perl via shell() on XP, module location problem
Message-Id: <2nt0h.1699$QZ4.647@news.cpqcorp.net>

doolittle wrote:
> Thanks for the suggestion, i think i understand (a bit of) whats going
> on:
> 
> The shell("mymodscript.pl") command runs in
> 
> C:/Documents and Settings/ibm/My Documents
> 
> this 'works' somehow although mymodscript.pl isn't in this directory,
> its in
> 
> C:/Documents and Settings/ibm/My Documents/perl
> 
> which is where the modules are, which is why perl can't find them.
> 
> So i could put the module in C:/Perl/site/lib, or alter @INC to include
> 
> C:/Documents and Settings/ibm/My Documents/perl
> 

Another method to use for modules you don't have in @INC is:

# yoursript.pl
use FindBin;
use lib $FindBin::Bin;    # adds location of script to @INC
use yourmodule;


This method requires yourmodule.pm be in the same directory as
yourscript.pl

-- 
brian


------------------------------

Date: 27 Oct 2006 11:16:26 -0700
From: "afrinspray" <afrinspray@gmail.com>
Subject: Re: Encoding problem: Rsquo to a with a hat
Message-Id: <1161972986.379979.87220@h48g2000cwc.googlegroups.com>

Ok after some research I think I can better narrow down the problem I'm
having.  The module XML::Filter::SAX1toSAX2 is converting my html
entities (&nbsp; &#8217 etc...) to weird characters.

I changed the XML::SAX::Machines Pipeline in my code from this:
my $machine = Pipeline(
	'XML::Filter::SAX1toSAX2'        =>
	'XML::Filter::BufferText'        =>
	'XML::Filter::HtmlTagStripper'   =>
	$writer
);

to
my $machine = Pipeline(
		  'XML::Filter::SAX1toSAX2'        =>
		  \*STDOUT
);

and it's converting the entities to gibberish.  Is there another
SAX1toSAX2 like module out there?  Can anyone thing of a replacement?
If i remove the SAX1toSAX2 call from the Pipeline, there's no output.

Also, on a side note I previous decoded the input using
MIME::Decoder...

Any help would be greatly appreciated.

Mike


afrinspray wrote:
> Sorry that was Todd W.:
> http://groups-beta.google.com/group/comp.lang.perl.misc/browse_thread/thread/a1d24b4eec251e80/
>
> Anyway, does anyone have any ideas how I can get it to stop convert & n
> b s p ; and other standard HTML entities to gibberish?
> 
> 
> Mike



------------------------------

Date: Fri, 27 Oct 2006 20:14:06 GMT
From: "Todd W" <trwww@sbcglobal.net>
Subject: Re: Encoding problem: Rsquo to a with a hat
Message-Id: <iMt0h.16602$GR.7460@newssvr29.news.prodigy.net>


"afrinspray" <afrinspray@gmail.com> wrote in message 
news:1161972986.379979.87220@h48g2000cwc.googlegroups.com...

Hi afrinspray, Im Todd W, the author of node 554219.

I glossed over (i.e. ignored) some things you have to keep in mind when 
using XML processors.

>> Anyway, does anyone have any ideas how I can get it to stop convert & n
>> b s p ; and other standard HTML entities to gibberish?
> Ok after some research I think I can better narrow down the problem I'm
> having.  The module XML::Filter::SAX1toSAX2 is converting my html
> entities (&nbsp; &#8217 etc...) to weird characters.

Well once you know whats going on you cant really call the output jibberish, 
as it is by design. Basically you are having an encoding issue. The 
following rambling is my attempt to explain well enough for you to come up 
with a solution.

Theres a few things going on here, so I need to break this up.

First, to explain how it is possible that you do not see &rsquo; in your 
output even though it is in your input.

Lets take a look at a more familiar feature of XML.

The XML illustrated here:

<tag attribute="value" />

is, to an xml parser, identical to the following snippet:

<tag attribute="value"></tag>

Also, this piece of XML:

<tag attribute="value">text</tag>

Is identical to this one:

<tag attribute='value'>text</tag>

To repeat: An xml parser (like your browser, or libxml2), dosent store 
information about the document at that level. It dosent care if attribute 
values are surrounded with single quotes or double quotes, or the tag ends 
with a / then a >, or with a closing </tag>. SGML says the parser must 
interpret the markup identically.

The situation is the same with your issue, character entity references. A 
parser must expand the entity reference, and is not allowed to differentiate 
between an entity reference (i.e. &XXXX;) and the entity itself.

Thats why it is even possible in the first place for the entity reference to 
not appear in the output document even though it is in the input document.

So to answer your question,  "Can I pass the entity reference through 
unexpanded?", the answer is no. Of course you could do something like dig in 
the code and find the part that expands entity references and have it change 
the reference to text, but youd be hacking the parser, making it do 
something its not supposed to do.

The next issue, the reason it appears as "jibberish" and not the expanded 
entity, is:

1: you are not exporting the data from perl as UTF8
    and/or
2: your document reader is either not configured to or capable of rendering 
UTF8.

Now, as to what to do from here. Thats even harder to explain than the (far 
from thorough) explination I gave above. I'll proceed by grabbing the code 
and data from that node, making some modifications, and describing my 
observations. The first thing I do is grab the data file from the node and 
change it to:

<html>
  <head>
    <title>Test Document</title>
  </head>
  <body>
    <p>The first &nbsp; paragraph</p>
    <p>the second paragraph</p>
    <hr width="75%">
    <div>last &rsquo; modified: WHENEVER</div>
  </body>
</html>

I run the program on it, and indeed I get jibberish:

C:\download\misc>strip.pl striptags.html
Wide character in print at C:\download\misc\strip.pl line 28.
Test Document<p>The first ?á paragraph</p><p>the second 
paragraph</p><div>last ?ÇÖ modified: WHENEVER</div>

Along with the "jibberish" I see a warning, "Wide character in print". This 
tells me I need to change the output layer encoding to UTF8 (because I know 
the data is stored in perl as UTF8).

So right before the

print $output;

in the program I add

binmode STDOUT, ":utf8";

C:\download\misc>strip.pl striptags.html
Test Document<p>The first ?á paragraph</p><p>the second 
paragraph</p><div>last ?ÇÖ modified: WHENEVER</div>

No more warning, but still "jibberish". Makes sense actually: my console 
dosent know how to render UTF8. But, IE has UTF8 aware parser. So I run:

C:\download\misc>strip.pl striptags.html > striptags.out.html
C:\download\misc>iexplore striptags.out.html

Okay, it displays properly in the browser. I can see the non breaking space, 
and I can see the right single quote. I'm suprised, acutually. I would have 
thought I needed to add a:

<meta http-equiv="Content-Type" content="text/html; charset=utf-8">

Can Firefox do it right automatically? Nope:

C:\download\misc>"c:\program files\mozilla firefox\firefox.exe" 
striptags.out.html

shows the "jibberish". But, if I add the meta tag above to the beginning of 
the file it renders properly.

Thanks for posting it was nice to get this written down.

Todd W.






------------------------------

Date: Fri, 27 Oct 2006 15:41:50 -0500
From: brian d  foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 4.29 How can I count the number of occurrences of a substring within a string?
Message-Id: <271020061541508110%brian.d.foy@gmail.com>

In article <1161955782.576895.233190@h48g2000cwc.googlegroups.com>,
werwer <drubnone@yahoo.com> wrote:


> > 4.29: How can I count the number of occurrences of a substring within a
> > string?

> $count = split(/this/, $s);

split() in scalar context is deprecated because of its side effects.
See perlfunc.

-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: Fri, 27 Oct 2006 15:34:09 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: FAQ 4.29 How can I count the number of occurrences of a substring within a string?
Message-Id: <slrnek4ra1.o20.tadmc@tadmc30.august.net>


[ text rearranged into a sensible order ]


werwer <drubnone@yahoo.com> wrote:

>> 4.29: How can I count the number of occurrences of a substring within a string?

> $count = split(/this/, $s);


Code that gives the wrong answer is not very useful...


----------------------------
#!/usr/bin/perl
use warnings;
use strict;

my $s = "this string has this in it this many times: 3\n";
my $count = split(/this/, $s);
print "$count\n";

$s = "a telepathist would say there is one in this string\n";
$count = split(/this/, $s);
print "$count\n";
----------------------------

$ test.pl
Use of implicit split to @_ is deprecated at ./test.pl line 6.
Use of implicit split to @_ is deprecated at ./test.pl line 10.
4
3


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 27 Oct 2006 12:37:47 -0700
From: "Jack" <shashichinnakar@gmail.com>
Subject: file convesrions
Message-Id: <1161976550.319064.308230@i42g2000cwa.googlegroups.com>

Hello all

       I have a question!!
               there is a file with extension dat  (ie *.dat) in my
unix environment and i wanted to change this to .xls format i mean i
have to transfer this file to an excel sheet and then i need to send
this file as an attachment to an email address and all this should be
done in perl....please reply me soon

regards,
jack



------------------------------

Date: 27 Oct 2006 14:38:42 -0700
From: "Jack" <shashichinnakar@gmail.com>
Subject: file convesrions
Message-Id: <1161976175.500601.21800@e3g2000cwe.googlegroups.com>

Hello all

       I have a question!!
               there is a file with extension dat  (ie *.dat) in my
unix environment and i wanted to change this to .xls format i mean i
have to transfer this file to an excel sheet and then i need to send
this file as an attachment to an email address and all this should be
done in perl....please reply me soon

regards,
jack



------------------------------

Date: Fri, 27 Oct 2006 14:55:11 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: file convesrions
Message-Id: <454263f3$0$505$815e3792@news.qwest.net>

Jack wrote:
> Hello all
> 
>        I have a question!!

I have an answer.

>                there is a file with extension dat  (ie *.dat) in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet 

You have to convert some file to an Excel spread sheet?

Open the file, parse what you want out of it, then write it using 
Spreadsheet::WriteExcel.

http://search.cpan.org/~jmcnamara/Spreadsheet-WriteExcel-2.17/lib/Spreadsheet/WriteExcel.pm

> and then i need to send
> this file as an attachment to an email address 

There are a lot of modules on CPAN to mail attachments.  Give it a try:

http://search.cpan.org

> and all this should be done in perl....

Hence the post to comp.lang.perl.misc. Why not write it in a language 
you know?

>please reply me soon

No thanks, I'll just post a response when I feel like it. :-)


------------------------------

Date: Fri, 27 Oct 2006 20:57:50 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: file convesrions
Message-Id: <uu4a14-bee.ln1@osiris.mauzo.dyndns.org>


Quoth "Jack" <shashichinnakar@gmail.com>:
>                there is a file with extension dat  (ie *.dat)

What the file's extension is is irrelevant. What matters is the format
of the data inside the file. .dat is commonly used for many different
file formats. If you can tell us what the format is, we may be able to
help you read it in Perl.

> in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet

When you want to do something complicated in Perl, first try looking at
http://search.cpan.org . Searching for 'excel' gives, on the first page
of results, the modules Spreadsheet::WriteExcel, for creating Excel
spreadsheets on any machine.

> and then i need to send
> this file as an attachment to an email address and all this should be
> done in perl

I would use the MIME::Lite module for this, though there are other
options.

> ....please reply me soon

Additions like this are considered rude here, as is writing without
capital letters or punctuation.

Ben

-- 
I've seen things you people wouldn't believe: attack ships on fire off
the shoulder of Orion; I watched C-beams glitter in the dark near the
Tannhauser Gate. All these moments will be lost, in time, like tears in rain.
Time to die.                                            benmorrow@tiscali.co.uk


------------------------------

Date: Fri, 27 Oct 2006 15:20:20 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: file convesrions
Message-Id: <slrnek4qg4.o20.tadmc@tadmc30.august.net>

Jack <shashichinnakar@gmail.com> wrote:

> please reply me soon


Hi. How ya doin?


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: Fri, 27 Oct 2006 15:21:22 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: file convesrions
Message-Id: <slrnek4qi2.o20.tadmc@tadmc30.august.net>

Jack <shashichinnakar@gmail.com> wrote:

>                there is a file with extension dat  (ie *.dat) in my
> unix environment and i wanted to change this to .xls format i mean i
> have to transfer this file to an excel sheet and then i need to send
> this file as an attachment to an email address and all this should be
> done in perl.


Did you mean to ask a question?

What part are you stuck on?


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 27 Oct 2006 11:51:59 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Net::Telnet, wrong prompt, user not needed only password is  requested
Message-Id: <1161975118.820487.210550@i42g2000cwa.googlegroups.com>

Hi,
with:
$ netcat 192.168.1.254 23
i get this prompt:
??????!????Fritz!Box web password:
and after typing the password and
# ls
the telnet session works fine.

but with perl:
my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
   $telnet->open('192.168.1.254');
   $telnet->login('root', 'passwd'); # user not needed only password is
 requested
my @lines =3D $telnet->cmd("ls");

i get a timeout. Any Idea???
thanks
georg



------------------------------

Date: 27 Oct 2006 11:52:26 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Net::Telnet, wrong prompt, user not needed only password is  requested
Message-Id: <1161975146.881847.314710@b28g2000cwb.googlegroups.com>

Hi,
with:
$ netcat 192.168.1.254 23
i get this prompt:
??????!????Fritz!Box web password:
and after typing the password and
# ls
the telnet session works fine.

but with perl:
my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
   $telnet->open('192.168.1.254');
   $telnet->login('root', 'passwd'); # user not needed only password is
 requested
my @lines =3D $telnet->cmd("ls");

i get a timeout. Any Idea???
thanks
georg



------------------------------

Date: Fri, 27 Oct 2006 14:43:21 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is  requested
Message-Id: <4542612e$0$10301$815e3792@news.qwest.net>

georg.heiss@gmx.de wrote:

> $ netcat 192.168.1.254 23
> i get this prompt:
> ??????!????Fritz!Box web password:
> and after typing the password and
> # ls
> the telnet session works fine.
> 
> but with perl:
> my $telnet = new Net::Telnet (Timeout => 55, Prompt => '/# /');
>    $telnet->open('192.168.1.254');
>    $telnet->login('root', 'passwd'); # user not needed only password is
>  requested
> my @lines = $telnet->cmd("ls");
> 
> i get a timeout. Any Idea???

Start with the documentation for Net::Telnet

    perldoc Net::Telnet

 From the documentation:

   login - perform standard login
     This method performs a standard login by waiting for a login prompt
     [...]If any of those prompts sent by the remote
     side don't match what's expected, this method will time-out, unless
     timeout is turned off.
    [...]
   Use "dump_log()" to debug when this method keeps timing-out and you
    don't think it should.

Maybe waitfor() will help.


------------------------------

Date: 27 Oct 2006 12:37:59 -0700
From: "DJ Stunks" <DJStunks@gmail.com>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161977879.789159.17550@k70g2000cwa.googlegroups.com>

georg.heiss@gmx.de wrote:
> Hi,
> with:
> $ netcat 192.168.1.254 23
> i get this prompt:
> ??????!????Fritz!Box web password:
> and after typing the password and
> # ls
> the telnet session works fine.
>
> but with perl:
> my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
>    $telnet->open('192.168.1.254');
>    $telnet->login('root', 'passwd'); # user not needed only password is
>  requested
> my @lines =3D $telnet->cmd("ls");
>
> i get a timeout. Any Idea???

yes, I have some ideas.  gather round kids while I read some
documentation!

  It was a dark and stormy night and Net::Telnet said:

      [The login()] method performs a standard login by waiting for a
      login prompt and responding with *$username*, then waiting for
      the password prompt and responding with *$password*, and then
      waiting for the command interpreter prompt. If any of those
      prompts sent by the remote side don't match what's expected,
      this method will time-out, unless timeout is turned off.

      Login prompt must match either of these case insensitive
      patterns:

          /login[: ]*$/i
          /username[: ]*$/i

      Password prompt must match this case insensitive pattern:

          /password[: ]*$/i

Yes, Perl tries to DWIM, but come on...

I suggest you RTFM before asking the follow-up question "ok, so how
do I send my password to _my_ box?"

-jp



------------------------------

Date: 27 Oct 2006 12:59:44 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161979184.082130.96460@k70g2000cwa.googlegroups.com>

oh i am so ...first read the documentation is a really good idea,
thanks a lot for your fast help!!!
georg

J=2E Gleixner schrieb:

> georg.heiss@gmx.de wrote:
>
> > $ netcat 192.168.1.254 23
> > i get this prompt:
> > ??????!????Fritz!Box web password:
> > and after typing the password and
> > # ls
> > the telnet session works fine.
> >
> > but with perl:
> > my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
> >    $telnet->open('192.168.1.254');
> >    $telnet->login('root', 'passwd'); # user not needed only password is
> >  requested
> > my @lines =3D $telnet->cmd("ls");
> >
> > i get a timeout. Any Idea???
>
> Start with the documentation for Net::Telnet
>
>     perldoc Net::Telnet
>
>  From the documentation:
>
>    login - perform standard login
>      This method performs a standard login by waiting for a login prompt
>      [...]If any of those prompts sent by the remote
>      side don't match what's expected, this method will time-out, unless
>      timeout is turned off.
>     [...]
>    Use "dump_log()" to debug when this method keeps timing-out and you
>     don't think it should.
>=20
> Maybe waitfor() will help.



------------------------------

Date: 27 Oct 2006 13:01:04 -0700
From: "georg.heiss@gmx.de" <georg.heiss@gmx.de>
Subject: Re: Net::Telnet, wrong prompt, user not needed only password is requested
Message-Id: <1161979264.830134.218210@e3g2000cwe.googlegroups.com>

oh i am so ...first read the documentation is a really good idea,
thanks a lot for your fast help!!!
georg

J=2E Gleixner schrieb:

> georg.heiss@gmx.de wrote:
>
> > $ netcat 192.168.1.254 23
> > i get this prompt:
> > ??????!????Fritz!Box web password:
> > and after typing the password and
> > # ls
> > the telnet session works fine.
> >
> > but with perl:
> > my $telnet =3D new Net::Telnet (Timeout =3D> 55, Prompt =3D> '/# /');
> >    $telnet->open('192.168.1.254');
> >    $telnet->login('root', 'passwd'); # user not needed only password is
> >  requested
> > my @lines =3D $telnet->cmd("ls");
> >
> > i get a timeout. Any Idea???
>
> Start with the documentation for Net::Telnet
>
>     perldoc Net::Telnet
>
>  From the documentation:
>
>    login - perform standard login
>      This method performs a standard login by waiting for a login prompt
>      [...]If any of those prompts sent by the remote
>      side don't match what's expected, this method will time-out, unless
>      timeout is turned off.
>     [...]
>    Use "dump_log()" to debug when this method keeps timing-out and you
>     don't think it should.
>=20
> Maybe waitfor() will help.



------------------------------

Date: 27 Oct 2006 13:59:11 -0700
From: "usaims" <usaims@yahoo.com>
Subject: perl program for clusters
Message-Id: <1161982751.699851.305190@h48g2000cwc.googlegroups.com>

Hello:

I'm in the process of writing a program that I can put on an apache
server which tells me which clusters are in or out of a load balancer.
I deal with 3 clusters all day long, which at all times, 2 clusters are
in the load balancer. I would like my boss to go to a web page and see
green for two clusters and a red for the one that is out. But I would
like to put this in a timetable graph so that they can see which
clusters were in at a certain time. Can somebody give some 'keywords'
to look for in google because I really don't have a clue on where to
start. My Perl skills are adequate but a little push in the right
direction will be greatly appreciated.

usaims



------------------------------

Date: Fri, 27 Oct 2006 11:35:53 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Reducing file length in Perl?
Message-Id: <1161974153.873264@bubbleator.drizzle.com>

<usenet@DavidFilmer.com> wrote:
> Mark wrote:
>> I am processing a large text file, and I need to eliminate all data after 
>> a
>> certain point in the file.
>
>   perldoc -f truncate

Dammit, I swear I looked that up in my Perl book.

It's there now, of course. I suppose the gnomes
snuck the page back in while I was posting my
question.

Thanks
-Mark




------------------------------

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 9899
***************************************


home help back first fref pref prev next nref lref last post