X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=dsa-nagios-checks%2Fchecks%2Fdsa-check-raid-aacraid;h=3e7375be4349cd412778457debdc6c495ac9ade7;hb=68719522b90a69886d62de048d9cd3440415da1d;hp=39d725a0dfbc92874992513a1643711a65edff46;hpb=cf2973bf115ddeb9adb42970d3f01d7d3377f4be;p=mirror%2Fdsa-nagios.git diff --git a/dsa-nagios-checks/checks/dsa-check-raid-aacraid b/dsa-nagios-checks/checks/dsa-check-raid-aacraid index 39d725a..3e7375b 100755 --- a/dsa-nagios-checks/checks/dsa-check-raid-aacraid +++ b/dsa-nagios-checks/checks/dsa-check-raid-aacraid @@ -139,5 +139,9 @@ while ($ctrl <= $numcontrollers) { if ( -e 'UcliEvt.log' ) { unlink('UcliEvt.log') or die ("Cannot unlink UcliEvt.log: $!\n"); } + +# Need to chdir out of tempdir in order to rm it in new perl +chdir ('/') or die ("Cannot chdir /: $!\n"); + print "$EXITCODE: ", join(" --- ", @resultstr), "\n"; exit $CODE{$EXITCODE};