our @EXPORT = qw(function);
####
use one -base;
####
import one;
####
@two::ISA = qw(one);
####
#!/usr/bin/perl
package one;
use Class::Spiffy -base;
our @EXPORT = qw(function);
sub function { print "Function in package one\n" }
package two;
@two::ISA = qw(one);
import one;
print STDERR "Class::Spiffy version is ", $Class::Spiffy::VERSION, "\n";
print STDERR "Can two function? ",two->can('function'), "\n";
function();
__END__
cd /home/henry/dev/
/usr/bin/perl -w /home/henry/dev/spiffy_bug.pl
Class::Spiffy version is 0.15
Can two function? CODE(0x814b738)
Function in package one
Compilation finished at Tue Feb 21 10:37:35