diff options
Diffstat (limited to 'unittests/autotestscripts/test_error_reporting.pl')
| -rw-r--r-- | unittests/autotestscripts/test_error_reporting.pl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/unittests/autotestscripts/test_error_reporting.pl b/unittests/autotestscripts/test_error_reporting.pl new file mode 100644 index 0000000..f705f9c --- /dev/null +++ b/unittests/autotestscripts/test_error_reporting.pl @@ -0,0 +1,13 @@ +#! perl +$errfname="//fileserver/user/cgreen/force_an_error.txt"; + +if (-e $errfname ) + { + unlink $errfname; + open(ERROUT,">errors.txt") || die "huh - can't write"; + { + print ERROUT "This is not an error - its just a test of the error script system.\n"; + close ERROUT; + } + + } |