2009年05月02日03:40 Perl FindBinで実行スクリプトのディレクトリ名を取得する備忘録 perlで @INC にサーチパスを追加するとき。 例えば、t(テスト)ディレクトリの中で、libディレクトリのパスを追加したいときはこのようにします。 #!/usr/bin/perl # スクリプトのパスはこんな感じだとし>ます # /home/sasata299/MyApp/t/hoge.t use strict; use warnings; # $Bin はスクリプトのディレクトリ名 # /home/sasata299/MyApp/t use FindBin qw($Bin); # /home/sasata299/MyApp/t/../lib を @INC に追加します use lib "$Bin/../lib"; warn Dumper \@INC; #$VAR1 = [ #