Perlプログラムの実行方法について
まずはWindows上でPerlを使用するための環境を整えてあげる必要がありますが,それについてはこちらのページを参考にしてください。とりあえずActive Perlをインストールさえできれば以降の説明へと進んでも大丈夫です。
1. コマンドプロントを起動させる(ついでにモジュールをインストールする)
[スタート]->[すべてのプログラム]->[アクセサリ]->[コマンドプロント]
コマンドプロントを起動させると次のように表示されているはずです。ここに「C:\Documents and Settings\Owne」と表示されていますが,これはディレクトリといい,現在作業中のフォルダを表しています。つまり,Cドライブの中にあるDocuments and Settingsという名前のフォルダがあり,さらにその中にあるOwnerという名前のフォルダを選択しているということです。
Microsoft Windows XP [Version 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.
C:\Documents and Settings\Owner>
この状態で cd.. と入力して Enterキー を押してください。
C:\Documents and Settings\Owner>cd..
C:\Documents and Settings>cd..
C:\>
これで現在はC:\>となっており,Cドライブを選択している状態になっているわけです。ここで ppm と入力して Enterキー を押してください。するといろんな文字が出てきます。
C:\>ppm
PPM - Programmer's Package Manager version 3.3.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm>
ppm> と表示されていることを確認したら,続いて install Statistics-Distributions と入力して Enterキー を押してください。インストールが自動的に始まりるので,しばらくの間,何もせずに待ちましょう。インストールが終了したら exit と入力して下さい。
ppm> install Statistics-Distributions
====================
Install 'Statistics-Distributions' version 1.02 in ActivePerl 5.8.7.815.
====================
Downloaded 5383 bytes.
Extracting 6/6: blib/arch/auto/Statistics/Distributions/.exists
Installing C:\Perl\html\site\lib\Statistics\Distributions.html
Installing C:\Perl\site\lib\auto\Statistics\Distributions\autosplit.ix
Installing C:\Perl\site\lib\Statistics\Distributions.pm
Successfully installed Statistics-Distributions version 1.02 in ActivePerl 5.8.7
.815.
ppm> exit
C:\>
2. Perlプログラムを実行させる
例としてp値を統合する方法のページに書かれているソースコードを実行させてみましょう。
手順1. ソースコードをメモ帳などの適当なテキストエディタにコピー&ペーストしてください。そしてCドライブの中にある『Perl』という名前のフォルダの中に保存してください。なおファイル名は何でもいいのですが,次の点に注意してください。
手順2. 使用ファイルを用意し,ソースコードと同じフォルダ(C://Perl)に保存します。拡張子は何でもかまいません。ただし,各手法のページで使用しているファイルと同じ形式(タブ区切り)でデータを入力してください。ここではsample.plという名前で保存したとします。
手順3. ディレクトリがC://Perlであることを確認してください。
C:\>cd Perl
C:\Perl>
手順4. 以下のように入力して下さい(赤い文字)。
C:\Perl>perl -cw sample.pl
sample.pl syntax OK
C:\Perl>sample.pl
inverse normal method:
1.7016209242273 (p=0.044413)
Fisher's method:
17.7088342926937 (df=2*6, both_p=0.12482, one side_p=0.06241)
⇒ perl -cw sample.plの意味
perlのソースコードに間違いがないかどうかを確かめるための命令です。
⇒ sample.plの意味
perlのソースコードが書かれたファイル(この場合はsample.pl)を実行させるための命令です。
補足 原則としてPerlが分からない人は中身をいじらない方が良いです。ただ,使用ファイルは自分で用意する必要があるので,それについて少し補足しておきます。
いずれのソースコードにおいても"データファイルの読み込み"のプログラムが記述されています。内容は理解しなくても構いませんが,
$pathname="p.dat";
という部分をみてください。これはp.datというデータファイルを読み込む場合の例ですが,例えば,mydata.datというファイル名であったら
$pathname="mydata.dat";
という具合に修正する必要があります。
#データファイルの読み込み $pathname="p.dat"; open MYFILE, "$pathname"; while (<MYFILE>) { chomp; @{"case$."} = split /\t/; } $k=$.; close MYFILE;