\n";
if ($fail) {
print "
FAIL
\n";
} else {
# so display it
$result = preg_replace ($patterns, $replacements, $template);
$result = preg_replace (array_keys ($eggs), array_values ($eggs),
$result);
print "
" . strtoupper($result) . "
\n";
}
print "
\n";
}
# If the last one worked, choose a different one.
if (! $fail) {
$last = isset ($which) ? $which : -1;
do {
$which = rand (0, count ($lolclass) - 1);
} while ($last == $which);
$words = parse_template ($lolclass[$which]);
}
print "