You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
280 B
13 lines
280 B
#! 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;
|
|
}
|
|
|
|
}
|