1package t::Pack::B; 2 3use strict; 4use warnings; 5 6use t::Pack::Carp; 7#use Carp::Clan qw/^t::Pack:: verbose/; 8 9sub b { 10 croak "Break!"; 11} 12 131; 14