同じLANのリモートホスト(ubuntu)の/ rootディレクトリにあるファイル(temp.txt)をubuntuマシンから読み取ろうとしています(sshとftpが開いています)perlスクリプトが接続でき、OpenSSHダイアログボックスが表示されますパスワードを要求すると、プログラムが存在します。誰か助けてください。以下は私のスクリプトです。
use POSIX qw(strftime);
use strict;
use warnings;
use File::Remote;
my $remote = new File::Remote;
# Standard filehandles
$remote->open(FILE, ">>X.X.X.X:/root/temp.txt") or die $!;
print FILE "Here's a line that's added.\n";
$remote->close(FILE);
実行すると以下のエラーが発生します。
Bareword "FILE" not allowed while "strict subs" in use at /root/Desktop/test.pl line 10.
Bareword "FILE" not allowed while "strict subs" in use at /root/Desktop/test.pl line 12.
Execution of /root/Desktop/test.pl aborted due to compilation errors.