{ my $fi2 = ''; $fi2 = FileImporter->new('t/test_data/really_good'); my %ref_check = ( _parseable_files => 'ARRAY', _nonparseable_files => 'ARRAY', _files => 'HASH', _bad_header_files => 'ARRAY', ); ref_check($fi2, \%ref_check); # tests are run in the subroutine }