# Compare actual output against each allowed output.
foreach my $exp_string (@$expected) {
my (@expected) = split ("\n", $exp_string);
# Compare actual output against each allowed output.
foreach my $exp_string (@$expected) {
my (@expected) = split ("\n", $exp_string);