In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Janek Schleicher) wrote:
> > comments welcome, but the webdragon.net addresses are currently down.
> > re-hosting elsewhere shortly. apologies.
> > defined($opts{'f'}) ? $opts{'f'} : 'ModuleCheck.txt'
>
> $opts{f} ||= 'ModuleCheck.txt';
Ultimately decided to leave this one as-is, although I'll bear this concept in mind
in future tasks -- the idea is intriguing . . .
> > my($ver, $cp) = ($ref->{$_}[0], $ref->{$_}[1]);
>
> my ($ver, $cp) = @{$ref->{$_}};
>
...
> > if (($ver || $cp) && !($ver && $cp)) {
>
> ($ver xor $cp)
but made these changes, as they are quite sensible ones.
> Couldn't find real bugs ;-)
always a good thing.
So, does anyone else have comments?
Anyone else find the script useful?
Anyone offering any objections or discourse on why this should not be posted to
CPAN's scripts section?
Anyone offering advice on HOW to post this to CPAN's scripts section properly?
Mildly surprising to see so few, (err actually only the one) responses -- is this
forum not as widely read as I'd imagined it to be?
print pack "H*", "4a75737420416e6f74686572204d61635065726c204861636b65722c0d";
--
Scott R. Godin | e-mail : [EMAIL PROTECTED]
Laughing Dragon Services | web : http://www.webdragon.net/
It is not necessary to cc: me via e-mail unless you mean to speak off-group.
I read these via nntp.perl.org, so as to get the stuff OUT of my mailbox. :-)
