perl <file.pl>は出力なしで実行されます

Question

言語モデルを生成するためのperlスクリプト（http://www.speech.cs.cmu.edu/tools/download/quick_lm.pl）をダウンロードしました。

perl quick_lm.plを実行すると、単に終了します。全く出力がありません。

• はい、私はperlをインストールしてあり、perl -vは完全に動作しています。

• 私は単純なhello-world perlスクリプトを作成しました。これはうまく動作します。 [最後に添付]

• したがって、quick_lm.plの最初の行にprint "hello";を含めて試したところ、perl quick_lm.plを試しても何も起こりません。

は私もchmod 777 quick_lm.plを使用してquick_lm.plすべての権限を与えてみました。私は./quick_lm.plを行うとき、今ではエラーを与える：

-bash: ./quick_lm.pl: /usr/local/bin/perl: bad interpreter: No such file or directory 

私はこのエラーを検索し、ほぼすべてのソリューションは、Windows CLRFを指摘し、それらとは違って、私は/usr/local/bin/perlで^Mを持っていません。また、まだperl quick_lm.plはうまくいくはずですか？

---

[bash.log]

someone@something:~/dictionary$ perl quick_lm.pl 
someone@something:~/dictionary$ perl quick_lm.pl -s words.txt 
someone@something:~/dictionary$ nano quick_lm.pl 
someone@something:~/dictionary$ perl quick_lm.pl -s words.txt 
someone@something:~/dictionary$ chmod 777 quick_lm.pl 
someone@something:~/dictionary$ ./quick_lm.pl 
-bash: ./quick_lm.pl: /usr/local/bin/perl: bad interpreter: No such file or directory 
someone@something:~/dictionary$ cat new.pl 
#!/usr/bin/perl -w 
use strict; 

print "Hello World\n"; 
someone@something:~/dictionary$ perl new.pl 
Hello World 
someone@something:~/dictionary$ 

[quick_lm.plの初めにprintを追加すると、問題の最小、runableデモにそれを軽減した後。]

#!/usr/local/bin/perl -w 
=POD 

...license... 

=END 

use Getopt::Std; 

print "hello world"; 
$VERBOSE = 1; 

sub handler { local($sig) = @_; 
      print STDERR "quick_lm caught a SIG$sig -- dying\n"; 

      exit(0); 
     } 
foreach (qw(XCPU KILL TERM STOP)) { $SIG{$_} = \&handler; } 

この完全なスクリプトではない、完全なスクリプトは最初の行に記載されたリンクにあります。私はそれが私のperlの設定と同じくらいファイルに関連しているかどうかはわかりません。あなたが推測したように、私はperlについてあまり考えていません。

私はあなたの時間を感謝し、:)

Answer 1

-bash: ./quick_lm.pl: /usr/local/bin/perl: bad interpreter: No such file or directory

がperlへの正しいパスを/usr/local/bin/perlを交換できます。このパスは、それが単に終了

perl -le'print $^X' 

---

から入手することができます。全く出力がありません。

=podディレクティブはインラインのドキュメント（ "POD"）の開始を示します。 =cutはPODのブロックの終わりを示します。

プログラムが間違ってPODのブロックの終わりをマークする代わりに=cutの=ENDを使用するため、Perlは、プログラム全体が一つの大きなコメントであると考えて... =cutで=ENDを交換してください。