1
0
mirror of https://github.com/MariaDB/server.git synced 2025-12-24 11:21:21 +03:00

In perl, to break out of a foreach loop we need to use

the keyword "last" and not "break".  Fixing the failing
test case.
This commit is contained in:
Annamalai Gurusami
2012-05-04 12:29:49 +05:30
parent bcc3d5ce25
commit f619c8ce83

View File

@@ -33,7 +33,7 @@ foreach $line (reverse @lines) {
++$count;
print "$line";
if ($count == 2) {
break;
last;
}
}
}