This can be hard to do because before the system will shut down it has to be able to close all open applications. Generally that can fail if there are unsaved documents and such. From Perl on Windows you can use Win32::InitiateSystemShutdown from the Win32 module to initiate the shut down.