こんにちはすべて、
私は1つの奇妙な問題を抱えている perlの スクリプトを実行します。ベローは、スクリプトを作成しようとしているiの内容です：

＃ ！は/ usr / local / binに/perlの

私の$ module_list \u003d '' ;
私のrunning_module @ ;
私の$カウント\u003d 0 ;
私の$フラグ\u003d 0 ;
私の環境変数$ ccprojecthome \u003d $ （ CCPROJECTHOME ） ;
@猫module_list \u003d ` $ ccprojecthome /製品/ $環境変数（ CCPROD ） / $ env類似（ CCPRODVER ） / env類似CCPRODVER ） （ _modbo.dat |カット- F2キー- D "は" ` / abp_ $設定;
module_list \u003d @ $サイズ;
" moddule_list [ 0 ] \ Ñ " \ Ñ最初の要素は$印刷;
"印刷\ Ñ配列の長さ$サイズ\ Ñ " ;
@猫running_proj_list \u003d ` $ ccprojecthome/module/ac/v650/config/module_profile |はgrep - vをプロジェクト|はgrep - vをベース|カットのF1 - Dの" " ` ;
$ module_list （ ） @モルドバforeachの
（
" \ Ñモジュール$モルドバ\ Ñ "印刷;
@ running_proj_list \u003d ` / usr / binに/猫$ ccprojecthome /モジュール/ $モルドバ/ $環境変数（ CCPRODVER ） / confing / module_profile |はgrep - vをプロジェクト|はgrep - vを
技術情報|カットのF1 - Dの" " ` ;
（ $ ？ ！ \u003d 0 ）
（
プリント"コマンドに失敗しました\ Ñ " ;
出口1 ;
）
）
"印刷\プロジェクトのÑ表示価格\ Ñ " ;

@ running_proj_list印刷" " ;

現在、問題は、ループのときに全体が適切に実行されますが、スクリプトを実行する動作していないとコメントされているとエラーをループの
この問題は出て助けてください。