for my $dir ( sort keys %dirLines ) {
    my $sameResults = sameArrayElements( @{ $dirLines{$dir} } );

...