I prefer using Win32::AdminMisc, it is a little briefer - but in fact it is just a wrapper to the function that $code_or_die pointed out:

Win32::AdminMisc::ExitWindows(EWX_REBOOT | EWX_FORCE);
[download]