Help for this page
} else { open(ERRLOG, ">>$errorlog") or warn "scrapping error output\n"; + ... print ERRLOG "Cannot delete dir $_ : $@!\n"; } }
#!/usr/bin/perl -w use strict; ... } }