小池啓仁ヒロヒト応援ブログ By はてな

小池啓仁（コイケヒロヒト）の動画など。

小池啓仁ヒロヒト応援ブログ By はてな

Perlで .NET Framework クラスを利用する

Perlノート

膨大な .NET FrameworkクラスをPerlでも利用できないかと考えました。

Perlでは、Windows用のPerlとしてActivePerlが利用できる。
ActivePerlでは、PerlScriptというスクリプトが利用できる。
PerlScriptでは、WScript Objectがデフォルトで利用できる。
WScript Objectでは、.NET Framework クラスが利用できる。

よって、Perlで .NET Framework クラスを利用することができるのです！

以下は、ヒントレベルで申し訳ありませんが、そのサンプルです。
.NET FrameworkのSystem.Collections.ArrayLisクラスを利用しています。

◆サンプル

<job id="PerlForNetFramework">
<script language="PerlScript">
use strict;
use warnings;

    our $WScript;
    my $ArrayList = $WScript->CreateObject("System.Collections.ArrayList");

    $ArrayList->Add("B");
    $ArrayList->Add("C");
    $ArrayList->Add("E");
    $ArrayList->Add("D");
    $ArrayList->Add("A");

    $ArrayList->Sort();

    #my $item = $ArrayList->Item(0);
    
    for my $i (0,1,2,3,4) {
        my $item = $ArrayList->Item($i);
        $WScript->Echo("$item");
    }
</script>
</job>

上記をメモ帳に貼り付けて、拡張子をwsfとしてファイル(perlnet.wsf等）にして、実行してみてください。

◆参考