perl -MWin32 -E"say'The man, he say: ',Win32::MsgBox('Is this what you are after?',4,'Just a question')==6 ?'yes':'no'"