($self->{lib}) = ($lib->print_name()); just put undef into $self->{lib} and undef->print_name can not work later. maybe you should replace

($self->{lib}) = ($lib->print_name());
[download]

with:

$self->{lib} = $lib;
[download]