Help for this page

Select Code to Download


  1. or download this
    my $final = qx("cscript out2.vbs");
print STDOUT "Final: $final\n";
  2. or download this
    my $final2 = system("cscript out2.vbs");
print STDOUT "Final2: $final2\n";
  3. or download this
        Dim num1, num2, final, str
    num1 = 30
...
    'MSGBOX str & final
    WScript.Quit(final)
    'Wscript.Echo final