【Perl 】初心者コーナーPart5

<job id="test">
<script language=PerlScript>
use Win32::OLE;

Win32::OLE->new('WScript.Shell')->Popup('Argument: '. $WScript->Arguments(0),2);
</script>
</job>

これをhoge.wsfファイルにして、何かをD&Dしてみそ。