develooper Front page | perl.perl5.porters | Postings from April 2007

Re: [perl #42601] Inconsistent warning of redefined subroutines in Exporter

Thread Previous | Thread Next
From:
Rick Delaney
Date:
April 20, 2007 09:17
Subject:
Re: [perl #42601] Inconsistent warning of redefined subroutines in Exporter
Message ID:
20070420161641.GD5793@bort.ca
On Apr 20 2007, Colin Robertson wrote:
> Also, as I mentioned earlier, I'm still seeing it on 5.8.8:

Sorry, I misread that post.  You also said you checked %INC.  Would you
mind checking again?  Try this:

  perl -we 'use Once; printf "%6d: %s\n",  -s, $_ for sort values %INC;'

With 5.8.8 I get:

Subroutine Once::foobar redefined at /usr/share/perl/5.8/Exporter.pm line 65.
 at Once.pm line 5
  4112: /usr/share/perl/5.8/Carp.pm
  5747: /usr/share/perl/5.8/Carp/Heavy.pm
  2218: /usr/share/perl/5.8/Exporter.pm
  3975: /usr/share/perl/5.8/base.pm
   599: /usr/share/perl/5.8/strict.pm
  1149: /usr/share/perl/5.8/vars.pm
 13018: /usr/share/perl/5.8/warnings.pm
   732: /usr/share/perl/5.8/warnings/register.pm
   103: Bar.pm
   103: Foo.pm
    65: Once.pm

Probably the last 3 will be different because of cut-and-paste
whitespace differences.

> colinr@pandora~/projects/exporter-bug $ perl5.8.8 -we 'use warnings; use
> Once;'
> colinr@pandora~/projects/exporter-bug $ perl5.8.8 -we 'use warnings; use
> Once; use Twice;'
> Subroutine Twice::foobar redefined at
> /opt/csw/share/perl/5.8.8/Exporter.pm line 65.
>  at Twice.pm line 4
> 					

-- 
Rick Delaney
rick@bort.ca

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About