[29203] in Perl-Users-Digest
Perl-Users Digest, Issue: 447 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat May 19 20:39:20 2007
Date: Sat, 19 May 2007 17:38:00 -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 Sat, 19 May 2007 Volume: 11 Number: 447
Today's topics:
Re: CGI.pm filefield return is inconsistent between I.E <evillen@gmail.com>
Re: CGI.pm filefield return is inconsistent between I.E <noreply@gunnar.cc>
Re: CGI.pm filefield return is inconsistent between I.E <evillen@gmail.com>
Re: CGI.pm filefield return is inconsistent between I.E <hjp-usenet2@hjp.at>
Re: CGI.pm filefield return is inconsistent between I.E <stoupa@practisoft.cz>
Re: Checking the syntax of Perl code <Peter@PSDT.com>
Re: Checking the syntax of Perl code <knipknap@gmail.com>
Re: FAQ 5.33 How do I close a file descriptor by number (Alan Curry)
Re: FAQ 5.33 How do I close a file descriptor by number <bik.mido@tiscalinet.it>
Re: FAQ 5.33 How do I close a file descriptor by number <brian.d.foy@gmail.com>
Interpreter Threads: Passing nested objects to a thread <knipknap@gmail.com>
new CPAN modules on Sat May 19 2007 (Randal Schwartz)
Re: Using "Perl Best Practices" inside-out objects <Peter@PSDT.com>
Re: Using "Perl Best Practices" inside-out objects <bik.mido@tiscalinet.it>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 19 May 2007 03:05:16 -0700
From: "evillen@gmail.com" <evillen@gmail.com>
Subject: Re: CGI.pm filefield return is inconsistent between I.E and Opera/Firefox
Message-Id: <1179569116.633265.19360@p47g2000hsd.googlegroups.com>
On 18 May, 19:27, trwww <waveri...@gmail.com> wrote:
> On May 18, 1:04 pm, "evil...@gmail.com" <evil...@gmail.com> wrote:
>
>
>
> > Hi
>
> > If I have the following line:
>
> > my $url = $q->filefield('url','ignored','30');
>
> > in my cgi code, a file selector widget is created. I then choose a
> > file from somewhere on my network. The form is sent to my next cgi
> > script which displays the value of
>
> > $q->param("url")
>
> > The problem is that Internet Explorer displays the full relative path
> > of the file and the filename, e.g.
>
> > C:\pcb_data_dump\eco5_01GR_issue3.emp
>
> > however the same code run through Opera or Firefox will simply display
> > the filename with no path e.g.
>
> > eco5_01GR_issue3.emp
>
> > I really need the full relative path - how can I get hold of it with
> > Opera or Firefox?
>
> > Thanks for any help
> > Len
>
> Your question is OT (not that you knew that) because the browsers were
> simply programmed to behave differently. I dont have the CGI spec in
> front of me, but I'm guessing that the part about the upload fields
> didnt specify exactly how that should work, so you get different
> implementations on different browsers.
>
> You could use javascript to set a hidden field by extracting the value
> of the file field like I've done on this page:
>
> http://www.waveright.com/filefield.html
>
> Here I've used a text field instead of a hidden field so you can see
> the behavior.
>
> But then your users have to have JS turned on unless you come up with
> a workaround.
>
> Hope this helps, and please find a more suitable newsgroup to send
> followup questions to.
>
> Todd W.
Your example at http://www.waveright.com/filefield.html only returns
the filename with no path when using Opera??
------------------------------
Date: Sat, 19 May 2007 14:05:37 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: CGI.pm filefield return is inconsistent between I.E and Opera/Firefox
Message-Id: <5b87laF2ro9deU1@mid.individual.net>
evillen@gmail.com wrote:
> in my cgi code, a file selector widget is created. I then choose a
> file from somewhere on my network. The form is sent to my next cgi
> script which displays the value of
>
> $q->param("url")
>
> The problem is that Internet Explorer displays the full relative path
> of the file and the filename, e.g.
>
> C:\pcb_data_dump\eco5_01GR_issue3.emp
>
> however the same code run through Opera or Firefox will simply display
> the filename with no path e.g.
>
> eco5_01GR_issue3.emp
Are you using the path to make the file available from a browser on the
client machine? Odd. You'd better upload the file to the server machine,
and make it available from there if desirable.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: 19 May 2007 07:58:42 -0700
From: "evillen@gmail.com" <evillen@gmail.com>
Subject: Re: CGI.pm filefield return is inconsistent between I.E and Opera/Firefox
Message-Id: <1179586722.699400.7460@p47g2000hsd.googlegroups.com>
On 19 May, 13:05, Gunnar Hjalmarsson <nore...@gunnar.cc> wrote:
> evil...@gmail.com wrote:
> > in my cgi code, a file selector widget is created. I then choose a
> > file from somewhere on my network. The form is sent to my next cgi
> > script which displays the value of
>
> > $q->param("url")
>
> > The problem is that Internet Explorer displays the full relative path
> > of the file and the filename, e.g.
>
> > C:\pcb_data_dump\eco5_01GR_issue3.emp
>
> > however the same code run through Opera or Firefox will simply display
> > the filename with no path e.g.
>
> > eco5_01GR_issue3.emp
>
> Are you using the path to make the file available from a browser on the
> client machine? Odd. You'd better upload the file to the server machine,
> and make it available from there if desirable.
>
> --
> Gunnar Hjalmarsson
> Email:http://www.gunnar.cc/cgi-bin/contact.pl
Yes I want to make the existing location available - this is for a
secure intranet. Perhaps uploading locally would be more safer but I
was hoping to avoid duplication of files.
------------------------------
Date: Sat, 19 May 2007 17:32:50 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: CGI.pm filefield return is inconsistent between I.E and Opera/Firefox
Message-Id: <slrnf4u652.d3j.hjp-usenet2@zeno.hjp.at>
On 2007-05-18 17:04, evillen@gmail.com <evillen@gmail.com> wrote:
> If I have the following line:
>
> my $url = $q->filefield('url','ignored','30');
>
> in my cgi code, a file selector widget is created. I then choose a
> file from somewhere on my network. The form is sent to my next cgi
The <input type="file" /> element is intended to upload the *contents*
of a file, not its filename. So when your browser sends the form, it
includes the complete content. It may also include the filename, but
this is not required (although recommended) by RFC 1867. What a "file
name" is is not defined, so it's hardly surprising that browsers
differ.
> The problem is that Internet Explorer displays the full relative path
> of the file and the filename, e.g.
>
> C:\pcb_data_dump\eco5_01GR_issue3.emp
>
> however the same code run through Opera or Firefox will simply display
> the filename with no path e.g.
>
> eco5_01GR_issue3.emp
>
> I really need the full relative path - how can I get hold of it with
> Opera or Firefox?
What use would a path on C:\ be on any other computer?
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: Sat, 19 May 2007 18:38:17 +0200
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: CGI.pm filefield return is inconsistent between I.E and Opera/Firefox
Message-Id: <f2n9e1$2u2a$1@ns.felk.cvut.cz>
<evillen@gmail.com> píse v diskusním príspevku
news:1179569116.633265.19360@p47g2000hsd.googlegroups.com...
> On 18 May, 19:27, trwww <waveri...@gmail.com> wrote:
> Your example at http://www.waveright.com/filefield.html only returns
> the filename with no path when using Opera??
>
I tried to modify html/javascript code of
http://www.waveright.com/filefield.html
Try it. Maybe this is what you want.
Note: look at the bottom of result page.
--- html page ---
<html>
<head>
<title>Upload Field</title>
<script type="text/javascript">
function getFileName(oForm) {
oForm.filename.value = oForm.datafile.value;
return true;
}
</script>
</head>
<body>
<h1>Upload Field</h1>
<form action="http://www.practisoft.cz/cgi-bin/testenv.cgi"
method="post" onsubmit="return( getFileName( this ) );"
enctype="multipart/form-data">
<table>
<tr>
<td>Choose File:</td>
<td><input type="file" name="datafile"></td>
</tr>
<tr><td colspan="2"> </tr></td>
<tr>
<td>Full Path:</td>
<td><input type="hidden" name="filename"></td>
</tr>
<tr>
<td>Submit Form:</td>
<td><input type="submit" value="Send"></td>
</tr>
</form>
</body>
</html>
--- html page ---
--
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your mail
from another non-spammer site please.)
------------------------------
Date: Sat, 19 May 2007 12:49:17 GMT
From: Peter Scott <Peter@PSDT.com>
Subject: Re: Checking the syntax of Perl code
Message-Id: <pan.2007.05.19.12.49.15.838574@PSDT.com>
On Fri, 18 May 2007 06:49:50 -0700, Samuel wrote:
> I have written a code generator (in Perl) that produces Perl code and
> would like to throw an assertion if the result contains invalid
> syntax. Any idea if there is a way to perform a syntax check that does
> not involve firing up a new process with "perl -c" or eval?
Nothing can do as complete a job as perl itself, but the closest anyone
has come is http://search.cpan.org/~adamk/PPI-1.118/lib/PPI.pm .
--
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/
------------------------------
Date: 19 May 2007 13:01:24 -0700
From: Samuel <knipknap@gmail.com>
Subject: Re: Checking the syntax of Perl code
Message-Id: <1179604884.178573.229120@n59g2000hsh.googlegroups.com>
On May 18, 7:52 pm, Samuel <knipk...@gmail.com> wrote:
> Ahh, you may be onto something here, I guess wrapping this into a
> function should do the trick. I'll try this when I'm back in the
> office on Monday.
I got to test this sooner, and it works in any case that I needed it
to.
Thanks again!
-Samuel
------------------------------
Date: Sat, 19 May 2007 08:26:40 +0000 (UTC)
From: pacman@TheWorld.com (Alan Curry)
Subject: Re: FAQ 5.33 How do I close a file descriptor by number?
Message-Id: <f2mcc0$hs$1@pcls4.std.com>
In article <72k2i4-00d.ln1@blue.stonehenge.com>,
PerlFAQ Server <brian@stonehenge.com> wrote:
> This should rarely be necessary, as the Perl Cclose()> function is to be
Cclose?
--
Alan Curry
pacman@world.std.com
------------------------------
Date: Sat, 19 May 2007 10:40:38 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 5.33 How do I close a file descriptor by number?
Message-Id: <4vdt4355ld3r1du322h9d95vg4ftj49unt@4ax.com>
On Sat, 19 May 2007 08:26:40 +0000 (UTC), pacman@TheWorld.com (Alan
Curry) wrote:
>> This should rarely be necessary, as the Perl Cclose()> function is to be
>
>Cclose?
A typo. That should be C<close()>.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 19 May 2007 11:58:51 -0500
From: brian d foy <brian.d.foy@gmail.com>
Subject: Re: FAQ 5.33 How do I close a file descriptor by number?
Message-Id: <190520071158512427%brian.d.foy@gmail.com>
In article <4vdt4355ld3r1du322h9d95vg4ftj49unt@4ax.com>, Michele Dondi
<bik.mido@tiscalinet.it> wrote:
> On Sat, 19 May 2007 08:26:40 +0000 (UTC), pacman@TheWorld.com (Alan
> Curry) wrote:
>
> >> This should rarely be necessary, as the Perl Cclose()> function is to be
> >
> >Cclose?
Fixed, thanks.
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: 19 May 2007 13:10:24 -0700
From: Samuel <knipknap@gmail.com>
Subject: Interpreter Threads: Passing nested objects to a thread
Message-Id: <1179605424.070848.243430@n59g2000hsh.googlegroups.com>
Hi,
When trying to do pass an object tree to a thread, the problem is that
threads::share() does not support nested objects. Is there a
workaround to still make the object available? Test case appended
below.
What this code does:
-----------------
$ perl test2.pl
The above works.
Waiting.
Result: Invalid value for shared scalar at test2.pl line 28.
Waiting.
Done.
-----------------
(I marked line 28 in the code below.)
-Samuel
------------------------
#!/usr/bin/perl
use strict;
my $obj = new TestClass(new TestClass());
$obj->exec();
print "The above works.\n";
my $worker = new Worker();
$worker->add($obj);
$worker->run();
while ($worker->is_running()) { print "Waiting.\n"; sleep 1; }
print "Done.\n";
package TestClass;
sub new {
my($class, $child) = @_;
$class = ref($class) || $class;
my $self = {};
bless $self, $class;
$self->{list} = qw//;
push(@{$self->{list}}, $child) if $child;
return $self;
}
sub exec {
my($self) = @_;
for (@{$self->{list}}) { $_->exec() } # This is line 28.
}
package Worker;
use threads;
use threads::shared;
sub new {
my($class, %args) = @_;
$class = ref($class) || $class;
my $self = {};
bless $self, $class;
$self->{threads} = &share([]);
$self->{queue} = &share([]);
return $self;
}
sub add {
my ($self, $command) = @_;
push(@{$self->{queue}}, &share($command));
}
sub run {
my ($self) = @_;
my $main_loop = threads->create(sub{$self->_main_loop()});
push(@{$self->{threads}}, &share($main_loop));
}
sub _main_loop {
my($self) = @_;
# Walk through all actions and start them in separate threads.
while (my $command = shift @{$self->{queue}}) {
eval q{$command->exec()};
print "Result: $@\n";
sleep 2;
}
shift @{$self->{threads}};
return 1;
}
sub is_running {
my($self) = @_;
return 1 if @{$self->{threads}} > 0;
return 0;
}
------------------------------
Date: Sat, 19 May 2007 04:42:10 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sat May 19 2007
Message-Id: <JI9uEA.M31@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Acme-GuessNumber-0.01
http://search.cpan.org/~imacat/Acme-GuessNumber-0.01/
Automatic number guessing game robot
----
Apache2-Modwheel-0.2.3
http://search.cpan.org/~asksh/Apache2-Modwheel-0.2.3/
Use Modwheel with mod_perl2
----
Archive-Tar-1.31
http://search.cpan.org/~kane/Archive-Tar-1.31/
module for manipulations of tar archives
----
Biblio-Isis-0.24
http://search.cpan.org/~dpavlin/Biblio-Isis-0.24/
Read CDS/ISIS, WinISIS and IsisMarc database
----
Business-ISBN-Data-1.14
http://search.cpan.org/~bdfoy/Business-ISBN-Data-1.14/
data pack for Business::ISBN
----
CGI-Application-Plugin-Cache-Adaptive-0.01
http://search.cpan.org/~zigorou/CGI-Application-Plugin-Cache-Adaptive-0.01/
Provide cacheable to method using attribute.
----
CGI-Application-Plugin-Cache-Adaptive-0.02
http://search.cpan.org/~zigorou/CGI-Application-Plugin-Cache-Adaptive-0.02/
Provide cacheable to method using attribute.
----
CGI-Application-Plugin-Feedback-1.04
http://search.cpan.org/~leocharre/CGI-Application-Plugin-Feedback-1.04/
simple end user feedback method
----
CPAN-Porters-0.01
http://search.cpan.org/~szabgab/CPAN-Porters-0.01/
resource for people maintaining packages of CPAN modules in various distributions
----
Catalyst-Engine-Apache-1.11
http://search.cpan.org/~agrundma/Catalyst-Engine-Apache-1.11/
Catalyst Apache Engines
----
DBIx-Class-Schema-RestrictByUser-0.0001_01
http://search.cpan.org/~groditi/DBIx-Class-Schema-RestrictByUser-0.0001_01/
Automatically restrict resultsets by user
----
DateTime-Format-Natural-0.33
http://search.cpan.org/~schubiger/DateTime-Format-Natural-0.33/
Create machine readable date/time with natural parsing logic
----
ETL-Pequel3-PlaceHolder-0.01
http://search.cpan.org/~gaffie/ETL-Pequel3-PlaceHolder-0.01/
----
Exception-Base-0.07
http://search.cpan.org/~dexter/Exception-Base-0.07/
Lightweight exceptions
----
File-Tools-0.04
http://search.cpan.org/~szabgab/File-Tools-0.04/
UNIX tools implemented as Perl Modules and made available to other platforms as well
----
JSON-Any-1.08
http://search.cpan.org/~perigrin/JSON-Any-1.08/
Wrapper Class for the various JSON classes.
----
MediaWiki-1.11
http://search.cpan.org/~spectrum/MediaWiki-1.11/
OOP MediaWiki engine client
----
Modwheel-0.3.1a
http://search.cpan.org/~asksh/Modwheel-0.3.1a/
Very extensible publishing-system
----
Net-Jaiku-0.02
http://search.cpan.org/~rickm/Net-Jaiku-0.02/
A perl interface to jaiku.com's API
----
Net-Scan-SSH-Server-SupportedAuth-0.01
http://search.cpan.org/~hirose/Net-Scan-SSH-Server-SupportedAuth-0.01/
detect supported authentication method of SSH server
----
Net-Scan-SSH-Server-SupportedAuth-0.02
http://search.cpan.org/~hirose/Net-Scan-SSH-Server-SupportedAuth-0.02/
detect supported authentication method of SSH server
----
ObjectDBI-0.07
http://search.cpan.org/~kjh/ObjectDBI-0.07/
Perl Object Serialization in an RDBMS using DBI
----
ObjectDBI-0.08
http://search.cpan.org/~kjh/ObjectDBI-0.08/
Perl Object Serialization in an RDBMS using DBI
----
POE-Component-Client-MogileFS-0.02
http://search.cpan.org/~mock/POE-Component-Client-MogileFS-0.02/
an async MogileFS client for POE
----
POE-Component-IRC-5.31_01
http://search.cpan.org/~bingos/POE-Component-IRC-5.31_01/
a fully event-driven IRC client module.
----
Parse-IRC-1.03
http://search.cpan.org/~bingos/Parse-IRC-1.03/
A parser for the IRC protocol.
----
Pod-Xhtml-1.57
http://search.cpan.org/~bbc/Pod-Xhtml-1.57/
Generate well-formed XHTML documents from POD format documentation
----
Regexp-Assemble-0.30
http://search.cpan.org/~dland/Regexp-Assemble-0.30/
Assemble multiple Regular Expressions into a single RE
----
Safe-Caller-0.06
http://search.cpan.org/~schubiger/Safe-Caller-0.06/
A nicer interface to the built-in caller()
----
Search-Tools-0.09
http://search.cpan.org/~karman/Search-Tools-0.09/
tools for building search applications
----
Search-Tools-0.10
http://search.cpan.org/~karman/Search-Tools-0.10/
tools for building search applications
----
Sys-Statistics-Linux-0.09_18
http://search.cpan.org/~bloonix/Sys-Statistics-Linux-0.09_18/
Front-end module to collect system statistics
----
Text-Starfish-1.04
http://search.cpan.org/~vlado/Text-Starfish-1.04/
and starfish - A Perl-based System for Text-Embedded Programming and Preprocessing
----
Tie-Handle-CSV-0.09
http://search.cpan.org/~danboo/Tie-Handle-CSV-0.09/
easy access to CSV files
----
XML-Parser-Wrapper-0.05
http://search.cpan.org/~dowens/XML-Parser-Wrapper-0.05/
A simple object wrapper around XML::Parser
----
re-engine-Plan9-0.04
http://search.cpan.org/~avar/re-engine-Plan9-0.04/
Plan 9 regular expression engine
----
re-engine-Plan9-0.05
http://search.cpan.org/~avar/re-engine-Plan9-0.05/
Plan 9 regular expression engine
----
re-engine-Plan9-0.06
http://search.cpan.org/~avar/re-engine-Plan9-0.06/
Plan 9 regular expression engine
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Sat, 19 May 2007 12:44:19 GMT
From: Peter Scott <Peter@PSDT.com>
Subject: Re: Using "Perl Best Practices" inside-out objects
Message-Id: <pan.2007.05.19.12.44.17.441681@PSDT.com>
On Fri, 18 May 2007 15:27:04 +0200, Michele Dondi wrote:
> On Fri, 18 May 2007 12:40:31 GMT, Peter Scott <Peter@PSDT.com> wrote:
>>> I briefly heard about attributes, and I know I could read the docs,
>>> but I hadn't seen that syntax yet: that is, angular parens. When were
>>> they introduced? Where are they documented? (I know about their use in
>>> Perl 6, but that's a whole another story.)
>>
>>perldoc Class::Std. They're completely peculiar to that module, because
>>it's parsing the argument of :ATTR itself. Parens and guillemots work
>>also, and fat comma syntax. Look in the source at the subroutine
>>_extractor_for_pair_named().
>
> I kinda understand: but then what's in the "argument" to an attribute
> is considered a plain string, that can be parsed at one's will?
Oh yes. perldoc attributes. Class::Std is using the native,
complicated way of parsing attributes directly rather than a helper module
like Attribute::Handlers. Look at MODIFY_type_ATTRIBUTES. In the case of
Class::Std programs, the type is HASH, and there is only one attribute in
the list, called 'ATTR'. Read further down: "...The parameter list is
passed as it was found, however..."
--
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/
------------------------------
Date: Sat, 19 May 2007 17:14:11 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Using "Perl Best Practices" inside-out objects
Message-Id: <t15u4310gnmj8c02nrf6t7nr2gv9oprsdk@4ax.com>
On Sat, 19 May 2007 12:44:19 GMT, Peter Scott <Peter@PSDT.com> wrote:
>Oh yes. perldoc attributes. Class::Std is using the native,
>complicated way of parsing attributes directly rather than a helper module
>like Attribute::Handlers. Look at MODIFY_type_ATTRIBUTES. In the case of
TY
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
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 447
**************************************
