1package DBICNSTest::RtBug41083::ResultSet::Foo; 2use strict; 3use warnings; 4use base 'DBICNSTest::RtBug41083::ResultSet'; 5 6sub fooBar { 1; } 7 81; 9