Not that it's germaine to the original questioner or has anything to do with Perl, but if you use shutdown with a delay you can kill the shutdown process before the countdown is finished and the box shouldn't reboot.