package Employee;
use Data::Dumper;

sub frobnicate {
    my $warnings_by_person = Person::get_warnings;
    warn Dumper $warnings_by_person;
};