perlquestion
jahero
<p>Hello wise monks!</p>
<p>I would like to ask a (probably) newbie question in regards to namespaces and names collisions.</p>
<p>Lets say that I have something like this in my code (shortened, incomplete).</p>
<code>
package Something::BufferedRead;
use strict;
use warnings FATAL => 'all';
use File::Basename;
our $VERSION = 1.00;
my $BUFFER_SIZE = 1048576;
sub new {
my $class = shift;
my @data = @_;
my $self = {};
bless $self, $class;
return $self;
}
sub basename {
my $self = shift;
return basename($self->{cfg}->{filename});
}
</code>
<p>
Now this fails to compile since 'basename' collides with name of sub imported from module File::Basename. Obvious solution would be to change name of my sub, for example to 'base_name', however I want to understand what exactly is going on, and how to prevent this from being pain in the future.
</p>
<p>
Which leads me to the real question.
<ul>
<li>Is there aby way how to prevent File:::Basename->basename from becoming a member of Something::BufferedRead namespace?
<li>How exactly does one influence what is imported from the module used? I am sure this has something to do with Exporter module and/or import methods, but details slip from grasp.
<li>What mechanism could I use to be able to declare 'basename' sub in my sub, and still have File::Basename->basename at my disposal?
</ul>
<p><b>
Thank you for your time!
</b>
</p>