Perlスクリプトはunixコマンドシステムを起動します。

Question

私はPerlスクリプトを使用してファイルを解凍しようとしています。ファイルを解凍するために、私はUNIXのコマンド・システムの解凍を試み、呼び出すことを選択しました。私の問題は、コマンドが変数を読み取っていないことが原因と思われる。

my $file_path = "/home/data" 
my $file_name = "TEST.ZIP" 

system ('unzip $file_path/$file_name'); 

私はコマンドを実行するとわかります。

unzip：/、/.zipまたは/.ZIPを見つけることができません。

この問題を解決するにはどうすればよいですか？

Answer 1

system ("unzip $file_path/$file_name"); 

文字列補間を使用する場合は、二重引用符を使用します。

Answer 2

適切なモジュール（Archive::Extract）を使用してください。