# MyBag.pm package MyBag; use warnings; use strict; use parent qw(MyTools); 1;