PerlScript

From Wikipedia, the free encyclopedia

PerlScript was initially solely an ActiveX Scripting Engine produced by the company ActiveState for use with Microsoft's Internet Information Services (IIS) that allows for programmers to use Perl-based code in addition to, or in place of, VBScript or JScript in the context of web servers running the ASP protocol. Subsequently an ASP module was created for the Apache web server, which allows for coding with only PerlScript, but neither VBScript nor JScript. PerlScript can also be used to write Windows Scripting Host-based programs, similar to VBScript.

Standalone PerlScripts can be executed if they are created with the file extension .pls, in which case they do not require enclosing XML, e.g.

use strict;
$WScript->Echo("Hello World!");

pls files do not gain access to drag and drop WSH functionality.

PerlScripts which have the extension wsf require XML tags which specify the job id and script language, e.g.

<Job ID="DropFiles">
<script language="PerlScript">
use strict;
    $WScript->Echo("Displaying names of dropped files");
    $arg = $WScript->{Arguments};
    $countArgs = $arg->{Count};
    for($i=0; $i<$countArgs; $i++) {
        $WScript->Echo($arg->Item($i));
    }
</script>
</Job>

wsf PerlScripts gain access to WSH drag and drop functionality, similarly to Perl Droplets in the now-obsolete MacPerl.

Most WSH objects are available via the implicitly created $WScript object.