use Win32;;
Win32::MsgBox( "Hi, from perl\nWhat can I do for you today?", MB_ICONQUESTION );;