[29189] in Perl-Users-Digest
Perl-Users Digest, Issue: 433 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun May 13 21:10:03 2007
Date: Sun, 13 May 2007 18:09:08 -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 Sun, 13 May 2007 Volume: 11 Number: 433
Today's topics:
Re: Converting 4 bytes to a float <hjp-usenet2@hjp.at>
Re: cpan -- suppress questions <brian.d.foy@gmail.com>
Re: cpan errors with "Undefined subroutine &Compress::Z <brian.d.foy@gmail.com>
Re: Creating .txt/.html file using perl script <rvtol+news@isolution.nl>
Re: Creating .txt/.html file using perl script <xicheng@gmail.com>
Re: Creating .txt/.html file using perl script <xicheng@gmail.com>
Re: Creating .txt/.html file using perl script <xicheng@gmail.com>
Creating Packages <whoami@whereami.net>
Re: Creating Packages <xicheng@gmail.com>
Diff Files contaning regex pattern string <Michael.Yxf@gmail.com>
Diff files with regex comparing <Michael.Yxf@gmail.com>
Re: Perl Tutorial With Exercises <rvtol+news@isolution.nl>
Re: Perl Tutorial With Exercises <brian.d.foy@gmail.com>
Re: Trouble with printing newlines to a file <rvtol+news@isolution.nl>
Re: Trouble with printing newlines to a file <hjp-usenet2@hjp.at>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 13 May 2007 21:30:57 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Converting 4 bytes to a float
Message-Id: <slrnf4eprh.qlq.hjp-usenet2@zeno.hjp.at>
On 2007-05-09 06:37, Brian McCauley <nobull67@gmail.com> wrote:
> On May 9, 1:35 am, "Larry.Mart...@gmail.com" <Larry.Mart...@gmail.com>
> wrote:
>> In C, I would do something akin to this:
>>
>> union convert_float32 {
>> float f; // float view
>> unsigned int i; // uint32 view
>>} c;
>
>
>> unsigned char i[4];
>> char *q;
>>
>> for (int j=0; j<4; j++) i[j] = (unsigned char)strtoul(d[j], &q, 10);
>> c.i = ((unsigned int)i[0] << 24) | ((unsigned int)i[1] << 16) |
>> ((unsigned int)i[2] << 8) | (unsigned int)i[3];
>>
>> and c.f would have the value I want (in this example
>> 23458486419456.000000)
>
> Actually it would make more sense to get rid of the intermediate step.
>
> union convert_float32 {
> float f; // float view
> unsigned char i[4]; // 4 byte view
> } c;
I don't think so. You are introducing an endian dependency which the
OP's code didn't have.
>> Is there some way I can achieve the result with perl?
>
> You are looking for the pack() and unpack() functions.
Unfortunately pack does't have a format for "single precision IEEE-754
floating point number in network byte order", so - as the OP already
found out - you either need to know the endianness of your platform, or
you need to convert from network (big endian) byte order to native byte
order first:
$fp_value = unpack('f', pack('L', unpack('N', $bytes)));
hp
--
_ | Peter J. Holzer | I know I'd be respectful of a pirate
|_|_) | Sysadmin WSR | with an emu on his shoulder.
| | | hjp@hjp.at |
__/ | http://www.hjp.at/ | -- Sam in "Freefall"
------------------------------
Date: Sun, 13 May 2007 11:35:02 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: cpan -- suppress questions
Message-Id: <130520071135028932%brian.d.foy@gmail.com>
In article <1179049453.333380.103370@h2g2000hsg.googlegroups.com>,
Yakov <iler.ml@gmail.com> wrote:
> How do I make cpan assume yes to all questions,
> or not to ask any questions (the "batch mode") ?
> Can I put something into CPAN/MyConfig.pm for that ?
Check your configuration for prerequisites_policy in the CPAN.pm conf
(explained in its documentation).
Besides that, some modules can prompt on their own, and there isn't a
setting to answer those questions.
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Sun, 13 May 2007 11:30:54 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: cpan errors with "Undefined subroutine &Compress::Zlib::gzopen"
Message-Id: <130520071130544087%brian.d.foy@gmail.com>
In article <1179051187.967580.40600@o5g2000hsb.googlegroups.com>, Yakov
<iler.ml@gmail.com> wrote:
> CPAN: LWP::UserAgent loaded ok
> Fetching with LWP:
> http://mirror.mirimar.net/cpan/modules/03modlist.data.gz
> Going to read /home/lerner/.cpan/sources/modules/03modlist.data.gz
> Undefined subroutine &Compress::Zlib::gzopen called at /usr/share/perl/
> 5.8/CPAN.pm line 5722.
>
> This is perl 5.8.8 on freshly installed debian 4. How do I fix this?
Is Compress::Zlib installed? If so, which version is it?
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Sun, 13 May 2007 11:21:00 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Creating .txt/.html file using perl script
Message-Id: <f26sig.1eo.1@news.isolution.nl>
jdblackford@gmail.com schreef:
> I was wondering if it was possible to create simple program that will
> create .txt (or .html) files based on information provided via
> prompts. [...]
> <td><img src="http://www.mywebsite.com/01.20.07/1.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/2.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/3.JPG">
> </tr>
> <tr>
> <td><img src="http://www.mywebsite.com/01.20.07/4.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/5.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/6.JPG">
It looks like you already know the filenames up ahead.
So why not let your code work from that infomation?
perldoc -f glob
perldoc -f readdir
Or create a file like
2007-01-20,6
2007-01-21,2
etc., and let your code use that.
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 13 May 2007 08:53:07 -0700
From: Xicheng Jia <xicheng@gmail.com>
Subject: Re: Creating .txt/.html file using perl script
Message-Id: <1179071587.147647.75200@e65g2000hsc.googlegroups.com>
On May 12, 5:45 pm, jdblackf...@gmail.com wrote:
> Hello,
>
> I was wondering if it was possible to create simple program that will
> create .txt (or .html) files based on information provided via
> prompts. If so, would someone be willing to assist me with this? I
> know absolutely nothing about Perl (or any other programming language
> for that matter)
>
> For instance, if I wanted to create a file called 01.20.07.html based
> off of a specific date (01 is MM, 20 is DD, 07 is YY) that looked like
> this:
>
> <html>
> <body>
> <table>
> <tr><td><img src="http://www.mywebsite.com/01.20.07/1.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/2.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/3.JPG">
> </tr>
> <tr><td><img src="http://www.mywebsite.com/01.20.07/4.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/5.JPG">
> <td><img src="http://www.mywebsite.com/01.20.07/6.JPG">
> </tr>
> </body>
> </html>
>
> I would like to be able to enter the following information when
> prompted by the program:
>
> MM
> DD
> YY
> Number of images
>
> If possible, I would like to have the code know how many table rows to
> create (in intervals of 3) based on the number of images.
>
> Is this something someone here can assist with?
You might want to check any Perl templating modules like TT(Template
Toolkits),
http://search.cpan.org/dist/Template-Toolkit/
which could possibly make your stuff much easier.(in your case, the
template file need just several inputs and a simple loop.)
BTW. if you can use <div> elements instead of table to organize your
output, that might be much easier, my 2 cents. :-)
Regards,
Xicheng
------------------------------
Date: 13 May 2007 15:47:59 -0700
From: Xicheng Jia <xicheng@gmail.com>
Subject: Re: Creating .txt/.html file using perl script
Message-Id: <1179096479.847539.112950@q75g2000hsh.googlegroups.com>
On May 13, 11:53 am, Xicheng Jia <xich...@gmail.com> wrote:
> On May 12, 5:45 pm, jdblackf...@gmail.com wrote:
>
>
>
>
>
> > Hello,
>
> > I was wondering if it was possible to create simple program that will
> > create .txt (or .html) files based on information provided via
> > prompts. If so, would someone be willing to assist me with this? I
> > know absolutely nothing about Perl (or any other programming language
> > for that matter)
>
> > For instance, if I wanted to create a file called 01.20.07.html based
> > off of a specific date (01 is MM, 20 is DD, 07 is YY) that looked like
> > this:
>
> > <html>
> > <body>
> > <table>
> > <tr><td><img src="http://www.mywebsite.com/01.20.07/1.JPG">
> > <td><img src="http://www.mywebsite.com/01.20.07/2.JPG">
> > <td><img src="http://www.mywebsite.com/01.20.07/3.JPG">
> > </tr>
> > <tr><td><img src="http://www.mywebsite.com/01.20.07/4.JPG">
> > <td><img src="http://www.mywebsite.com/01.20.07/5.JPG">
> > <td><img src="http://www.mywebsite.com/01.20.07/6.JPG">
> > </tr>
> > </body>
> > </html>
>
> > I would like to be able to enter the following information when
> > prompted by the program:
>
> > MM
> > DD
> > YY
> > Number of images
>
> > If possible, I would like to have the code know how many table rows to
> > create (in intervals of 3) based on the number of images.
>
> > Is this something someone here can assist with?
>
> You might want to check any Perl templating modules like TT(Template
> Toolkits),
>
> http://search.cpan.org/dist/Template-Toolkit/
>
> which could possibly make your stuff much easier.(in your case, the
> template file need just several inputs and a simple loop.)
>
> BTW. if you can use <div> elements instead of table to organize your
> output, that might be much easier, my 2 cents. :-)
>
> Regards,
> Xicheng- Hide quoted text -
> - Show quoted text -
Below is a TT test code for your needs, you actually only need to
figure a data structure and then TT can do the other stuff pretty
easily:
you run it this way: ./ex1.pl 01.20.70 13 5
If you can use <div> and set CSS styles to control their (float|
width|...)s, then a plain 1-D array will do all stuff...
Regards,
Xicheng
#### ex1.pl ####
#!/usr/bin/perl
use warnings;
use strict;
use Template;
if (@ARGV < 2) {
print "./ex1.pl mm.dd.yy numPic [numCol]\n";
exit;
}
my ($date, $numPic) = @ARGV;
my $numCol = $ARGV[2] || 3;
my $residuals = $numCol - ($numPic % $numCol);
my $items;
my $n = 0;
for my $item (1..$numPic) {
push @{$items->[$n]}, $item;
$n++ if not $item % $numCol;
}
push @{$items->[$n]}, (0) x $residuals;
my $tt = Template->new();
my $input = 'ex1.tt';
my $args = {
site => $date,
items => $items,
};
$tt->process($input, $args, "$date.html") or die $tt->error( );
__END__
#### ex1.tt ####
<html>
<head>
<title>TT test page</title>
</head>
<body>
<table>
[% FOREACH item IN items -%]
<tr>
[% FOREACH cell IN item -%]
[% IF !cell -%]
<td> </td>
[% ELSE -%]
<td><img src="http://www.mywebsite.com/[% site %]/[% cell
%].JPG"></td>
[% END -%]
[% END -%]
</tr>
[% END -%]
</table>
</body>
</html>
------------------------------
Date: 13 May 2007 16:50:33 -0700
From: Xicheng Jia <xicheng@gmail.com>
Subject: Re: Creating .txt/.html file using perl script
Message-Id: <1179100233.434911.134200@y80g2000hsf.googlegroups.com>
On May 13, 6:47 pm, Xicheng Jia <xich...@gmail.com> wrote:
> On May 13, 11:53 am, Xicheng Jia <xich...@gmail.com> wrote:
>
>
>
>
>
> > On May 12, 5:45 pm, jdblackf...@gmail.com wrote:
>
> > > Hello,
>
> > > I was wondering if it was possible to create simple program that will
> > > create .txt (or .html) files based on information provided via
> > > prompts. If so, would someone be willing to assist me with this? I
> > > know absolutely nothing about Perl (or any other programming language
> > > for that matter)
>
> > > For instance, if I wanted to create a file called 01.20.07.html based
> > > off of a specific date (01 is MM, 20 is DD, 07 is YY) that looked like
> > > this:
>
> > > <html>
> > > <body>
> > > <table>
> > > <tr><td><img src="http://www.mywebsite.com/01.20.07/1.JPG">
> > > <td><img src="http://www.mywebsite.com/01.20.07/2.JPG">
> > > <td><img src="http://www.mywebsite.com/01.20.07/3.JPG">
> > > </tr>
> > > <tr><td><img src="http://www.mywebsite.com/01.20.07/4.JPG">
> > > <td><img src="http://www.mywebsite.com/01.20.07/5.JPG">
> > > <td><img src="http://www.mywebsite.com/01.20.07/6.JPG">
> > > </tr>
> > > </body>
> > > </html>
>
> > > I would like to be able to enter the following information when
> > > prompted by the program:
>
> > > MM
> > > DD
> > > YY
> > > Number of images
>
> > > If possible, I would like to have the code know how many table rows to
> > > create (in intervals of 3) based on the number of images.
>
> > > Is this something someone here can assist with?
>
> > You might want to check any Perl templating modules like TT(Template
> > Toolkits),
>
> > http://search.cpan.org/dist/Template-Toolkit/
>
> > which could possibly make your stuff much easier.(in your case, the
> > template file need just several inputs and a simple loop.)
>
> > BTW. if you can use <div> elements instead of table to organize your
> > output, that might be much easier, my 2 cents. :-)
>
> > Regards,
> > Xicheng- Hide quoted text -
> > - Show quoted text -
>
> Below is a TT test code for your needs, you actually only need to
> figure a data structure and then TT can do the other stuff pretty
> easily:
>
> you run it this way: ./ex1.pl 01.20.70 13 5
>
> If you can use <div> and set CSS styles to control their (float|
> width|...)s, then a plain 1-D array will do all stuff...
>
> Regards,
> Xicheng
>
> #### ex1.pl ####
> #!/usr/bin/perl
> use warnings;
> use strict;
> use Template;
>
> if (@ARGV < 2) {
> print "./ex1.pl mm.dd.yy numPic [numCol]\n";
> exit;}
>
> my ($date, $numPic) = @ARGV;
> my $numCol = $ARGV[2] || 3;
>
> my $residuals = $numCol - ($numPic % $numCol);
> my $items;
> my $n = 0;
>
> for my $item (1..$numPic) {
> push @{$items->[$n]}, $item;
> $n++ if not $item % $numCol;}
>
XC> push @{$items->[$n]}, (0) x $residuals;
A bug from the above line, should be :
push @{$items->[$n]}, (0) x $residuals if not $residuals == $numCol;
Regards,
Xicheng
>
> my $tt = Template->new();
> my $input = 'ex1.tt';
> my $args = {
> site => $date,
> items => $items,};
>
> $tt->process($input, $args, "$date.html") or die $tt->error( );
>
> __END__
>
> #### ex1.tt ####
> <html>
> <head>
> <title>TT test page</title>
> </head>
> <body>
> <table>
> [% FOREACH item IN items -%]
> <tr>
> [% FOREACH cell IN item -%]
> [% IF !cell -%]
> <td> </td>
> [% ELSE -%]
> <td><img src="http://www.mywebsite.com/[% site %]/[% cell
> %].JPG"></td>
> [% END -%]
> [% END -%]
> </tr>
> [% END -%]
> </table>
> </body>
> </html>- Hide quoted text -
>
> - Show quoted text -
------------------------------
Date: Sun, 13 May 2007 23:34:54 +0100
From: "IanW" <whoami@whereami.net>
Subject: Creating Packages
Message-Id: <f283pr$s1g$1@energise.enta.net>
Hi
I've created a Perl script to generate "3D" bar graphs using GD. As it is,
it's easy enough to use via the normal "require" method and so have made it
available from my website to that end:
http://www.creationfactor.net/software.htm
However, I'd quite like to stick it up on CPAN so it's available to download
and install as a module. So, I found a "toot" tutorial somewhere and several
hours and a big headache later decided to go and study a pint of beer
instead! I got lost somewhere in the region of.. well - all of it actually -
passing objects around, scoping in general and things like the exporter.
Would someone like to take a quick look at the script and tell me how
difficult it would be to convert into a module, given the way I've written
it? Would it require a huge amount of changing?
Thanks
Ian
------------------------------
Date: 13 May 2007 16:16:36 -0700
From: Xicheng Jia <xicheng@gmail.com>
Subject: Re: Creating Packages
Message-Id: <1179098196.466093.257610@h2g2000hsg.googlegroups.com>
On May 13, 6:34 pm, "IanW" <who...@whereami.net> wrote:
> Hi
>
> I've created a Perl script to generate "3D" bar graphs using GD. As it is,
> it's easy enough to use via the normal "require" method and so have made it
> available from my website to that end:
>
> http://www.creationfactor.net/software.htm
>
> However, I'd quite like to stick it up on CPAN so it's available to download
> and install as a module. So, I found a "toot" tutorial somewhere and several
> hours and a big headache later decided to go and study a pint of beer
> instead! I got lost somewhere in the region of.. well - all of it actually -
> passing objects around, scoping in general and things like the exporter.
>
> Would someone like to take a quick look at the script and tell me how
> difficult it would be to convert into a module, given the way I've written
> it? Would it require a huge amount of changing?
Not sure if I understood you correctly? you want to change a general-
purpose perl file into a Perl module? If so, you probably want to
check 'h2xs'.
man h2xs
it will help you do most of the necessary modular interfaces, you just
need to insert your subroutines into proper (file|locations), and then
make your own documentation. If you want an OO module, then no need to
use Exporter.
Be careful to name your methods if you want 'Exporter'ed things and
make sure no conflicts about the namespaces with your main code.
Regards,
Xicheng
------------------------------
Date: 13 May 2007 08:27:08 -0700
From: Michael Yang <Michael.Yxf@gmail.com>
Subject: Diff Files contaning regex pattern string
Message-Id: <1179070028.325570.55480@o5g2000hsb.googlegroups.com>
Here I have two files to diff, let's say one is a base file, the other
is a result file.
<base file>:
Conntected to the '.*'
Hello, I am .*
Glad to see you .*
<result file>:
Connected to the 'www.perl.com'
Hello, I am michael
Nice to meet you, all
There are regex pattern string ".*" in the base file, indicating that
it could be replaced by any text.
When the regex string of ".*" occurs, it should be detected that
whether it matches the counter-part in the result file. If it matches,
as shown above, the two lines are considered as equal.
So when diff the above two files, only the last line of two files are
in the diff data:
Glad to see you .*
and
Nice to meet you, all
If I want to do this, I need to implement my own diff algorithm.
Is there any way simpler to achieve this? Like if there is a
comparison function, designed by this regex algorithm, could be passed
to Diff object, the diff program will compare two files based on the
rules I gave to it.
Your helps are greatly appreciated. :)
------------------------------
Date: 13 May 2007 08:40:28 -0700
From: Michael Yang <Michael.Yxf@gmail.com>
Subject: Diff files with regex comparing
Message-Id: <1179070828.601755.8780@w5g2000hsg.googlegroups.com>
Here I have two files to diff, I want them compared with my rules.
Let's one is base file, the other is result file:
base file:
Connected to the '.*'
Hello everyone, I am .*
Glad to see you, .*
result file:
Connected to the 'www.perl.com'
Hello everyone, I am michael
Nice to see you, all
There are regex string ".*" in the base file, indicating that it could
be replaced by any string. When the two lines being compared, I want
it be considered equal when the ".*" matches the couter-part of the
other, like the first two lines in the files shown above.
So when diff these two files, only the last line is the difference
data after diff.
Glad to see you, .*
Nice to see you, all
I need to change the rules of diff program, and for that I need to
implement my own diff algorithm.
Is there any ways simpler to achieve this?
I don't know if there are any interface providing user-defined
comparison function to diff.
If there is, I can implement my own comparison function telling it how
to compare two lines and pass the function as the reference to the
diff function. The diff function will compare and diff files using my
comparison rules.
Your helps are greatly appreciated!!
------------------------------
Date: Sun, 13 May 2007 15:51:22 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Perl Tutorial With Exercises
Message-Id: <f27ces.s0.1@news.isolution.nl>
prateek.ja schreef:
> Can anybody suggest a good online perl tutorial
http://learn.perl.org/
http://perl101.org/
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Sun, 13 May 2007 11:29:36 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: Perl Tutorial With Exercises
Message-Id: <130520071129369389%brian.d.foy@gmail.com>
In article <4646FF2E.6050308@home.com>, numberwhun <me@home.com> wrote:
> In addition, I not only recommend Learning Perl, but I recently
> discovered that Brian D Foy produced a student workbook that was put out
> by O'Reilly that has a bunch of extra exercises geared to each chapter
> of the book. Lots of good practice if you want it.
>
> For your reference, the ISBN is #9780596009960
This is available on Amazon, but I also have a big box of them in my
office which I'm selling at cost.
http://www.theperlreview.com/learning_perl_study_guide/
I also sell them through Amazon (check the New & Used Marketplace
stuff), but that's a bit more expensive because of the Amazon fees.
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Sun, 13 May 2007 15:36:31 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Trouble with printing newlines to a file
Message-Id: <f27bil.s0.1@news.isolution.nl>
A. Sinan Unur schreef:
> Also, if one wants specific characters, it is better to specify them
> by their codes rather than using \n whose meaning depends on what the
> platform thinks a line ending ought to be.
Using either "\n" of chr(10) or "\x0A" or "\x{0A}" or "\012" or "\cJ"
(etc.) seems to make no difference (on Windows, have not tested OS-X).
So just don't forget to call binmode, if the platform's line ending is
not what you want:
C:\>perl -we "print chr(10)" > test.out
C:\>debug test.out
-d
14C6:0100 0D 0A 00 00 00 00 00 00-[...]
-r
AX=0000 BX=0000 CX=0002 DX=0000[...]
C:\>perl -we "binmode STDOUT; print chr(10)" > test.out
C:\>debug test.out
-d
14C6:0100 0A 0A 00 00 00 00 00 00-[...]
-r
AX=0000 BX=0000 CX=0001 DX=0000[...]
(the value in CX is the size of the file)
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Sun, 13 May 2007 21:16:38 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Trouble with printing newlines to a file
Message-Id: <slrnf4ep0m.qlq.hjp-usenet2@zeno.hjp.at>
On 2007-05-13 13:36, Dr.Ruud <rvtol+news@isolution.nl> wrote:
> A. Sinan Unur schreef:
>> Also, if one wants specific characters, it is better to specify them
>> by their codes rather than using \n whose meaning depends on what the
>> platform thinks a line ending ought to be.
>
>
> Using either "\n" of chr(10) or "\x0A" or "\x{0A}" or "\012" or "\cJ"
> (etc.) seems to make no difference (on Windows, have not tested OS-X).
Yes, "\n" is the same as "\x0A" on Windows. I think it's the same on
MacOS X, but it was "\x0D" on MacOS <= 9.
I don't know what EBCDIC-based versions of perl use: NL ("\x15") is
probably more natural than LF ("\x25") there.
hp
--
_ | Peter J. Holzer | I know I'd be respectful of a pirate
|_|_) | Sysadmin WSR | with an emu on his shoulder.
| | | hjp@hjp.at |
__/ | http://www.hjp.at/ | -- Sam in "Freefall"
------------------------------
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 V11 Issue 433
**************************************
