version 1.2, 2004/12/06 20:34:57
|
version 1.3, 2005/07/14 03:26:56
|
Line 70 if (! $first_test_result) {
|
Line 70 if (! $first_test_result) {
|
print "Unable to run first HTML::Parser test\n"; |
print "Unable to run first HTML::Parser test\n"; |
} elsif ($first_test_result ne $first_expected_result) { |
} elsif ($first_test_result ne $first_expected_result) { |
print <<"END"; |
print <<"END"; |
**** WARNING: HTML::Parser is not working properly. |
**** ERROR: HTML::Parser is not working properly. |
You are using version $version. For test 1 it returned |
You are using version $version. For test 1 it returned |
"$first_test_result" |
"$first_test_result" |
END |
END |
Line 90 if (! $second_test_result) {
|
Line 90 if (! $second_test_result) {
|
print "Unable to run second HTML::Parser test\n"; |
print "Unable to run second HTML::Parser test\n"; |
} elsif ($second_test_result ne $second_expected_result) { |
} elsif ($second_test_result ne $second_expected_result) { |
print <<"END"; |
print <<"END"; |
**** WARNING: HTML::Parser is not working properly. |
**** ERROR: HTML::Parser is not working properly. |
You are using version $version. For test 2 it returned |
You are using version $version. For test 2 it returned |
"$second_test_result" |
"$second_test_result" |
END |
END |