[29806] in Perl-Users-Digest
Perl-Users Digest, Issue: 1049 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Nov 22 03:09:42 2007
Date: Thu, 22 Nov 2007 00:09:05 -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 Thu, 22 Nov 2007 Volume: 11 Number: 1049
Today's topics:
Re: A little help on perl hashes.. clearguy02@yahoo.com
Re: Calling a SQL Server Stored Procedure from within P <kkeller-usenet@wombat.san-francisco.ca.us>
How to determine whether output is a terminal? <njus@larshaugseth.com>
Re: How to determine whether output is a terminal? <krahnj@telus.net>
Re: How to determine whether output is a terminal? <njus@larshaugseth.com>
is this expected behavior? perl '' test.pl wilburlo@gmail.com
Re: list context inside term <rvtol+news@isolution.nl>
Re: list context inside term <rvtol+news@isolution.nl>
minicpan, CPAN/CPANPLUS and autobundles on linux <doom@kzsu.stanford.edu>
new CPAN modules on Thu Nov 22 2007 (Randal Schwartz)
POSIX signal handling: inputs needed <rsarpi@gmail.com>
Re: POSIX signal handling: inputs needed <peter@makholm.net>
quote variables (was: Re: firefox could open my cgi, IE <rvtol+news@isolution.nl>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 21 Nov 2007 21:33:55 -0800 (PST)
From: clearguy02@yahoo.com
Subject: Re: A little help on perl hashes..
Message-Id: <16cd0f7b-e2b3-4316-b1df-f084afd9f842@s8g2000prg.googlegroups.com>
On Nov 21, 12:36 pm, cleargu...@yahoo.com wrote:
> Hi all,
>
> I am struggling with the below puzzle:
>
> Here is the contents of a file, c:\test.txt
>
> ============================================================
> user id name uid mid
>
> jsmiths john 00206251 00207609
> jcarter joseph 00207609 00220458
> mstella mary 00202227 00207609
> cgoldberg cindy 00220458 00202003
> mshiva murthy 00224981 00207609
> hwatson henry 00202003 00201869
> =============================================================
>
> jcarter is the manager of jsmiths, mstella and mshiva;
> cgoldberg is the manager of jcarter;
> hwatson is the manager of cgoldberg;
>
> In the output file, I need to replace the mid with the manager id as
> follows. And the topmost manager (hwatson) can remain with his id.
>
> ================================================
> user id name manager id
>
> jsmiths john jcarter
> jcarter joseph cgoldberg
> mstella mary jcarter
> cgoldberg cindy hwatson
> mshiva murthy jcarter
> hwatson henry hwatson
> =================================================
>
> I am uisng the hases and arrays and not getting the desired output.
>
> Can some one help me out here?
>
> Thanks,
> JC
Can some one take a look at it? :)
JC
------------------------------
Date: Wed, 21 Nov 2007 22:55:54 -0800
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: Calling a SQL Server Stored Procedure from within Perl
Message-Id: <rolf15x9cc.ln2@goaway.wombat.san-francisco.ca.us>
On 2007-11-21, smallpond <smallpond@juno.com> wrote:
>
> perl -we 'warn $v;'
> Name "main::v" used only once: possible typo at -e line 1.
> Use of uninitialized value in warn at -e line 1.
> Warning: something's wrong at -e line 1.
>
> Heh. I like the message. How to warn someone of an error
> when the warning has an error.
Well, the scenario I had in mind is more like
perl -we '$v="";warn $v;'
Even less informative than your example. :)
--keith
--
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information
------------------------------
Date: 22 Nov 2007 05:28:47 +0100
From: Lars Haugseth <njus@larshaugseth.com>
Subject: How to determine whether output is a terminal?
Message-Id: <m17ikaewe8.fsf@vader.eiendomsnett.no>
First, I hope the the question in the subject isn't the wrong one. What
I'm trying to do is to write a wrapper (in Perl) around the GNU 'ls'
command to format the output according to my liking. I know there are
several options in 'ls' to control output, but none that suits my needs.
By default, 'ls' adds colors when output is directly to a terminal.
However, if I capture the output of 'ls' through backticks, I don't get
colors. What I would like to do is for my Perl wrapper to determine
the nature of STDOUT, and add the "--color" option to 'ls' when appro-
priate (in accord with the default behavior of 'ls'.)
How would I go about doing this?
--
Lars Haugseth
"If anyone disagrees with anything I say, I am quite prepared not only to
retract it, but also to deny under oath that I ever said it." -Tom Lehrer
------------------------------
Date: Thu, 22 Nov 2007 05:32:25 GMT
From: "John W. Krahn" <krahnj@telus.net>
Subject: Re: How to determine whether output is a terminal?
Message-Id: <47451461.E0FF9E27@telus.net>
Lars Haugseth wrote:
>
> First, I hope the the question in the subject isn't the wrong one. What
> I'm trying to do is to write a wrapper (in Perl) around the GNU 'ls'
> command to format the output according to my liking. I know there are
> several options in 'ls' to control output, but none that suits my needs.
>
> By default, 'ls' adds colors when output is directly to a terminal.
> However, if I capture the output of 'ls' through backticks, I don't get
> colors. What I would like to do is for my Perl wrapper to determine
> the nature of STDOUT, and add the "--color" option to 'ls' when appro-
> priate (in accord with the default behavior of 'ls'.)
>
> How would I go about doing this?
perldoc -f -t
John
--
use Perl;
program
fulfillment
------------------------------
Date: 22 Nov 2007 07:02:46 +0100
From: Lars Haugseth <njus@larshaugseth.com>
Subject: Re: How to determine whether output is a terminal?
Message-Id: <m13auyes1l.fsf@vader.eiendomsnett.no>
* "John W. Krahn" <krahnj@telus.net> wrote:
>
> Lars Haugseth wrote:
> >
> > First, I hope the the question in the subject isn't the wrong one. What
> > I'm trying to do is to write a wrapper (in Perl) around the GNU 'ls'
> > command to format the output according to my liking. I know there are
> > several options in 'ls' to control output, but none that suits my needs.
> >
> > By default, 'ls' adds colors when output is directly to a terminal.
> > However, if I capture the output of 'ls' through backticks, I don't get
> > colors. What I would like to do is for my Perl wrapper to determine
> > the nature of STDOUT, and add the "--color" option to 'ls' when appro-
> > priate (in accord with the default behavior of 'ls'.)
> >
> > How would I go about doing this?
>
> perldoc -f -t
Ah, that simple. Thank you!
--
Lars Haugseth
"If anyone disagrees with anything I say, I am quite prepared not only to
retract it, but also to deny under oath that I ever said it." -Tom Lehrer
------------------------------
Date: Wed, 21 Nov 2007 23:55:39 -0800 (PST)
From: wilburlo@gmail.com
Subject: is this expected behavior? perl '' test.pl
Message-Id: <f94d56cc-c993-4eb2-b87f-c68ca3c0d6c4@s12g2000prg.googlegroups.com>
Hi,
I attempting to debug an odd open3 call that was passed something
like this:
open3( ...,...,..., @args);
The @args is where things get interesting the invocation is:
perl '' test.pl
Where the '' is 2 single quotes representing an empty entity, and
test.pl can be any script.
When perl 5.8.8 & perl 5.9.5 see the "empty" argument they read source
code from STDIN and then execute the code from STDIN. It halts,
waiting for code from the keyboard.
This ?bug? originally came about when someone tried to do this:
@args = ( 'perl',$extralibs,'etc...');
problem was $extralibs was empty. :)
On one side of the coin, I don't see any documentation regarding this
situation in "perldoc perl". On the other side of the coin, empty
arguments should probably be annoyed. And on yet the another side of
the coin, I should check $extralibs for being empty before stuffing it
into an array! :)
I didn't think a perlbug report was proper, so following the INSTALL
instructions ... here it is.
-daniel
------------------------------
Date: Thu, 22 Nov 2007 00:06:21 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: list context inside term
Message-Id: <fi2h6u.1o0.1@news.isolution.nl>
smallpond schreef:
> The missing list context in this case is a known perl5 bug.
> perl6 proposes a list keyword for just this issue:
> http://dev.perl.org/perl6/rfc/175.html
How about the missing boolean context.
$x = grep( sometest($_), @values ) ? 'yes' : 'no';
in which grep() could shortcut, meaning stop when the first value would
make sometest() return true.
See also List::Util::first().
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Thu, 22 Nov 2007 00:21:18 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: list context inside term
Message-Id: <fi2i2u.1qg.1@news.isolution.nl>
Dr.Ruud schreef:
> smallpond schreef:
>> The missing list context in this case is a known perl5 bug.
>> perl6 proposes a list keyword for just this issue:
>> http://dev.perl.org/perl6/rfc/175.html
>
> How about the missing boolean context.
>
> $x = grep( sometest($_), @values ) ? 'yes' : 'no';
Correction:
$x = (grep( sometest($_), @values ) ? 'yes' : 'no');
> in which grep() could shortcut, meaning stop when the first value
> would make sometest() return true.
>
> See also List::Util::first().
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Wed, 21 Nov 2007 20:10:10 -0800
From: Joseph Brenner <doom@kzsu.stanford.edu>
Subject: minicpan, CPAN/CPANPLUS and autobundles on linux
Message-Id: <871wai9azh.fsf@kzsu.stanford.edu>
I'm getting my laptop (AMD64 based) set-up with the latest
version of Kubuntu (7.10 Gutsy Gibbon), and I'm trying to do
something that doesn't seem to me like it should be terribly
complicated, but I'm running into some funny problem I'm not
seeing:
(1) I've created a custom Bundle of perl modules installed on my
workstation, using CPAN.pm's "autobundle" command.
(2) I've installed a "minicpan" copy on my laptop, using the
minicpan command included with the CPAN::Mini module.
(3) I want to configure CPANPLUS or CPAN so that it can be used
to install my Bundle, working from the packages in the minicpan
mirror.
I would've thought that all I need to do is to stick the full
path to the minicpan inside of the "urllist" in
~/.cpan/CPAN/MyConfig.pm.
I keep having funny problems with the CPAN shell trying to
install the wrong version from the minicpan mirror, I gather
because it's using an stale meta data from the ~/.cpan location
rather than getting it from the mirror location.
Anyway, if anyone's done anything like this before, I'd
appreciate some hints on what you did (perhaps a copy of your
MyConfig.pm).
And if anyone's really interested, I can try to type up a more
thorough listing of what I've done and the error messages I've
seen, and so on.
------------------------------
Date: Thu, 22 Nov 2007 05:42:16 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Thu Nov 22 2007
Message-Id: <Jrw7uG.8Cr@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.
Apache-GzipChain-1.20
http://search.cpan.org/~andk/Apache-GzipChain-1.20/
compress HTML (or anything) in the OutputChain
----
Apache2-AuthCAS-0.2
http://search.cpan.org/~jhitt/Apache2-AuthCAS-0.2/
A configurable Apache authentication module that enables you to protect content on an Apache server using an existing JA-SIG CAS authentication server.
----
App-Addex-AddressBook-Abook-0.004
http://search.cpan.org/~rjbs/App-Addex-AddressBook-Abook-0.004/
use the "abook" program as the addex source
----
App-Addex-AddressBook-Apple-0.005
http://search.cpan.org/~rjbs/App-Addex-AddressBook-Apple-0.005/
use Apple Address Book as the addex source
----
App-Cmd-0.012
http://search.cpan.org/~rjbs/App-Cmd-0.012/
write command line apps with less suffering
----
Bryar-Config-YAML-0.102
http://search.cpan.org/~rjbs/Bryar-Config-YAML-0.102/
Bryar configuration stored in YAML
----
CGI-FormBuilderX-More-0.010
http://search.cpan.org/~rkrimen/CGI-FormBuilderX-More-0.010/
Additional input gathering/interrogating functionality for CGI::FormBuilder
----
CGI-FormBuilderX-More-0.011
http://search.cpan.org/~rkrimen/CGI-FormBuilderX-More-0.011/
Additional input gathering/interrogating functionality for CGI::FormBuilder
----
Catalyst-Controller-SOAP-0.0.6
http://search.cpan.org/~druoso/Catalyst-Controller-SOAP-0.0.6/
Catalyst SOAP Controller
----
Catalyst-Plugin-ConfigLoader-0.19
http://search.cpan.org/~bricas/Catalyst-Plugin-ConfigLoader-0.19/
Load config files of various types
----
Class-Accessor-Bundle-0.02
http://search.cpan.org/~marcel/Class-Accessor-Bundle-0.02/
install Class::Accessor and derived distributions
----
Class-Hookable-0.02
http://search.cpan.org/~nyarla/Class-Hookable-0.02/
Base class for hook mechanism
----
Class-Value-Bundle-0.02
http://search.cpan.org/~marcel/Class-Value-Bundle-0.02/
install Class::Value and derived distributions
----
Class-Value-Net-0.02
http://search.cpan.org/~marcel/Class-Value-Net-0.02/
network-related value objects
----
Class-Value-SemanticAdapter-0.01
http://search.cpan.org/~marcel/Class-Value-SemanticAdapter-0.01/
Adapter for Data::Semantic objects
----
Class-Value-URI-0.01
http://search.cpan.org/~marcel/Class-Value-URI-0.01/
Value classes for URIs
----
ClearCase-SyncTree-0.47
http://search.cpan.org/~dsb/ClearCase-SyncTree-0.47/
Synchronize a tree of files with a tree of elements
----
Config-INI-0.011
http://search.cpan.org/~rjbs/Config-INI-0.011/
simple .ini-file format
----
DJabberd-Delivery-OfflineStorage-0.03
http://search.cpan.org/~piers/DJabberd-Delivery-OfflineStorage-0.03/
Basic OfflineStorage (old style) for DJabberd
----
Data-Domain-Bundle-0.01
http://search.cpan.org/~marcel/Data-Domain-Bundle-0.01/
install Data::Domain and derived distributions
----
Data-Domain-Net-0.01
http://search.cpan.org/~marcel/Data-Domain-Net-0.01/
Data domain classes for IP addresses
----
Data-Domain-SemanticAdapter-0.01
http://search.cpan.org/~marcel/Data-Domain-SemanticAdapter-0.01/
Adapter for Data::Semantic objects
----
Data-Domain-URI-0.01
http://search.cpan.org/~marcel/Data-Domain-URI-0.01/
Data domain classes for URIs
----
Data-Semantic-0.01
http://search.cpan.org/~marcel/Data-Semantic-0.01/
Common API for data with semantics attached to them
----
Data-Semantic-Bundle-0.01
http://search.cpan.org/~marcel/Data-Semantic-Bundle-0.01/
install Data::Semantic and derived distributions
----
Data-Semantic-Net-0.01
http://search.cpan.org/~marcel/Data-Semantic-Net-0.01/
Semantic data classes for net-related data
----
Data-Semantic-URI-0.01
http://search.cpan.org/~marcel/Data-Semantic-URI-0.01/
Semantic data classes for URIs
----
DateTimeX-Easy-0.082
http://search.cpan.org/~rkrimen/DateTimeX-Easy-0.082/
Parse a date/time string using the best method available
----
Devel-PerlySense-0.01_28
http://search.cpan.org/~johanl/Devel-PerlySense-0.01_28/
IntelliSense for Perl
----
Document-Maker-0.022
http://search.cpan.org/~rkrimen/Document-Maker-0.022/
Makefile-like functionality in Perl
----
EV-1.1
http://search.cpan.org/~mlehmann/EV-1.1/
perl interface to libev, a high performance full-featured event loop
----
GD-Cairo-0.01
http://search.cpan.org/~timbrody/GD-Cairo-0.01/
GD API wrapper around Cairo
----
GD-SecurityImage-Utils-1.02
http://search.cpan.org/~leocharre/GD-SecurityImage-Utils-1.02/
generate captcha images and save to file
----
HTML-StripScripts-LibXML-0.11
http://search.cpan.org/~drtech/HTML-StripScripts-LibXML-0.11/
XSS filter - outputs a LibXML Document or DocumentFragment
----
HTML-StripScripts-Parser-1.01
http://search.cpan.org/~drtech/HTML-StripScripts-Parser-1.01/
XSS filter using HTML::Parser
----
Language-Befunge-Debugger-0.3.3
http://search.cpan.org/~jquelin/Language-Befunge-Debugger-0.3.3/
a graphical debugger for Language::Befunge
----
Log-Log4perl-1.14
http://search.cpan.org/~mschilli/Log-Log4perl-1.14/
Log4j implementation for Perl
----
Net-Flow-0.01
http://search.cpan.org/~akoba/Net-Flow-0.01/
decode and encode NetFlow/IPFIX datagrams.
----
Net-Hiveminder-0.01
http://search.cpan.org/~sartak/Net-Hiveminder-0.01/
Perl interface to hiveminder.com
----
Net-Jifty-0.02
http://search.cpan.org/~sartak/Net-Jifty-0.02/
interface to online Jifty applications
----
Net-Whois-Raw-1.38
http://search.cpan.org/~despair/Net-Whois-Raw-1.38/
Get Whois information for domains
----
ShipIt-Bundle-0.02
http://search.cpan.org/~marcel/ShipIt-Bundle-0.02/
install all ShipIt-related distributions
----
ShipIt-Step-Jaiku-0.01
http://search.cpan.org/~marcel/ShipIt-Step-Jaiku-0.01/
ShipIt step to announce the upload on Jaiku
----
Signal-StackTrace-0.02
http://search.cpan.org/~lembark/Signal-StackTrace-0.02/
install signal handler to print a stacktrace.
----
String-LCSS_XS-0.2
http://search.cpan.org/~limaone/String-LCSS_XS-0.2/
Find The Longest Common Substring of Two Strings.
----
Sub-Exporter-0.978
http://search.cpan.org/~rjbs/Sub-Exporter-0.978/
a sophisticated exporter for custom-built routines
----
Template-Plugin-Heritable-0.04
http://search.cpan.org/~samv/Template-Plugin-Heritable-0.04/
OO dispatching and inheritance for templates
----
Test-Count-0.0104
http://search.cpan.org/~shlomif/Test-Count-0.0104/
Module for keeping track of the number of tests in a Test Script.
----
Test-Virtual-Filesystem-0.06
http://search.cpan.org/~cdolan/Test-Virtual-Filesystem-0.06/
Validate a filesystem
----
Win32-0.34
http://search.cpan.org/~jdb/Win32-0.34/
Interfaces to some Win32 API Functions
----
XML-Bare-0.27
http://search.cpan.org/~codechild/XML-Bare-0.27/
Minimal XML parser implemented via a C state engine
----
XML-Entities-0.01
http://search.cpan.org/~sixtease/XML-Entities-0.01/
Decode strings with XML entities
----
XML-Trivial-0.04
http://search.cpan.org/~pajout/XML-Trivial-0.04/
The trivial tool representing parsed XML as tree of read only objects.
----
parrot-0.5.0
http://search.cpan.org/~chromatic/parrot-0.5.0/
----
rpm-build-perl-0.6.6
http://search.cpan.org/~atourbin/rpm-build-perl-0.6.6/
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: Wed, 21 Nov 2007 18:35:15 -0800 (PST)
From: monk <rsarpi@gmail.com>
Subject: POSIX signal handling: inputs needed
Message-Id: <5d2570db-0acf-4fb7-b261-9cd1cea80c5a@e10g2000prf.googlegroups.com>
Hi all,
Is it safe/sane/common practice to have a program react to every
single POSIX signal there is out there available in the OS?
Some friends have suggested to just stick to the basic ones such as
TSTP and INT. Meaning, tell the program to do something (like an
email alert) if it receives a control-Z or control-C only. But what
about the others?
My fear is that my chronic paranoia might get in the way, thus making
my programs unstable.
At the same time, I don't want to miss any unseen events that may
affect my programs reliability.
Positively, _*any*_ thoughts are welcome.
for example, to see what I mean if confusing above. I don't know if it
matters but I'm using Linux 2.6.x and AIX 5.3 with perl 5.8.2. Thanks
in advance. :
#!/usr/bin/perl
use strict;
use warnings;
#all this does is print "hello world" every 1 second --given a true
condition.
#if *any* signal is received, the status changes to false exiting the
program gracefully.
#my vars
my $signal;
my $status = 1;
my $pid;
my @all_signals;
my $file_handler;
#sub routine handling the signal received
sub signal_handler {
$signal = shift;
$status = 0;
$SIG{$signal} = \&signal_handler;
}
#get all signals available on AIX
#add them up to an array
sub get_all_my_signals {
foreach my $list (sort keys %SIG){
push (@all_signals, $list);
}
}
sub go {
#get all signals available on this OS
get_all_my_signals();
#if any signal is received, change status to zero
#thus exiting the loop.
foreach (@all_signals){
$SIG{$_} = \&signal_handler;
}
#Current process' PID is
$pid = $$;
#writing pid to a file
open ($file_handler, ">", "test.pid");
print $file_handler $pid;
close $file_handler;
while ($status == 1){
print "hello world\n";
sleep 1;
}
print "out of loop. Got signal \$SIG{$signal}\n";
#house keeping
unlink "test.pid" if (-e "test.pid");
exit(0);
}
###done defniing now let's call it
#call it now..
go();
------------------------------
Date: Thu, 22 Nov 2007 07:45:10 +0000
From: Peter Makholm <peter@makholm.net>
Subject: Re: POSIX signal handling: inputs needed
Message-Id: <87ir3ulo55.fsf@hacking.dk>
monk <rsarpi@gmail.com> writes:
> Some friends have suggested to just stick to the basic ones such as
> TSTP and INT. Meaning, tell the program to do something (like an
> email alert) if it receives a control-Z or control-C only. But what
> about the others?
I would suggest to stick with the signals intended meanings. Do not
redefine SIGINT to mean anything but 'user tried to interrupt the
process'. Only exception is that you're allowed to use SIGHUP for
restarting af server and rereading the configuration.
If you need to use signals for some user defined actions you should
use SIGUSR1 and SIGUSR2.
> My fear is that my chronic paranoia might get in the way, thus making
> my programs unstable.
> At the same time, I don't want to miss any unseen events that may
> affect my programs reliability.
Catching all signals will lead to instabilities. Taking you example,
do you really mean to stop just because you're resizin you window to
see more hellos (SIGWINCH)? And if you using tcp communication, do you
really want to take some action if the other end sends a specially
crafted package (SIGURG) - this can lead to a DoS-attack.
//Makholm
------------------------------
Date: Wed, 21 Nov 2007 23:48:45 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: quote variables (was: Re: firefox could open my cgi, IE will be dead, why?)
Message-Id: <fi2gam.1t8.1@news.isolution.nl>
Ben Morrow schreef:
> Ron Bergin:
>> 2) Unless there is a possibility of having spaces in the filename,
>> there is no need (and most will say you shouldn't) use the quotes
>> around the var.
>
> Perl is not shell. There is no need to quote variables, ever, unless
> you *really* care about stringification for some reason.
Yes, sometimes you can make use of stringification. See for example the
rename method in IO::All,
http://search.cpan.org/src/INGY/IO-All-0.38/lib/IO/All/Filesys.pm
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
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 1049
***************************************