package Thirdlane::CPAN::Local; sub new { my ($this) = shift; my $self = { @_ }; my ($class) = ref($this) || $this; bless($self, $class); return $self; } sub import { my ($class, @import_args) = @_; return 1; } 1;