package Subclass_1; use base 'Baseclass'; { my @values = (...); sub use_values { ... } }