use Name; use Age; package Person; { use Object::InsideOut qw(Name Age); } 1;