foreach my $l(@{$mctest->{loglines}}) { print $l . "\n"; }