{ my $da; # 1 lives_ok { $da = File::Collector::DateAnalyzer->new('t/test_data/many_files'); } 'creates DateAnalyzer object'; $da->{files}{some_files}->do->print_blah_names; $da->{files}{some_files}->do->print_short_names; }