Re: Module Naming Dilemma

Why not just use a GLOB reference alias?. This will make package Bar works as an alias for Foo:

  *Bar:: = \*Foo:: ;
[download]

Here's a sample:

package Foo ;

sub new { bless {} }

sub test { print "TEST> [@_]\n" ; }

package main ;

  *Bar:: = \*Foo:: ;

  my $foo = Foo->new() ;
  $foo->test(123) ;
  print "$foo\n" ;

  my $bar = Bar->new() ;
  $bar->test(456) ;
  print "$bar\n" ;
[download]

Output:

TEST> [Foo=HASH(0x1a4ece4) 123]
Foo=HASH(0x1a4ece4)
TEST> [Foo=HASH(0x15d53dc) 456]
Foo=HASH(0x15d53dc)
[download]

Comment on Re: Module Naming Dilemma Select or Download Code

Replies are listed 'Best First'.
Re^2: Module Naming Dilemma by Ven'Tatsu (Deacon) on Jan 06, 2005 at 18:26 UTC
Doing that you have altered the global namespace. If you were to use this in a module then some one could potentialy overwrite another class used in their code or in another module without ever knowing it. Ovid's and gaal's ideas are both compleatly isolated. In short your begging to get bit by this code if it's used in production.	[reply]