Ipアドレスとホスト名を表示させ、テキストドキュメントに記録したいのですが
#!/usr/bin/perl
use strict;
use warnings;
my $ip = $ENV{‘REMOTE_ADDR’};
my $host = gethostbyaddr(pack(“C4″, split(‘\.’, $ip)), 2) || $ip;
print “Content-type: text/html\n”;
print “\n”;
print “$host”;
print “\n”;
print “$ip”;
my $file = ‘output.txt';
#書き込みモードでファイルオープン
my $fh;
open ($fh,”>”,”$file”);
or die “Cannot open $file: $!”;
#ファイルへかきこみ
print $fh “$host\n”;
print $fh “$ip\n”;
close $fh;
この様にしてもエラーになってしまいます。どこに問題があるのでしょうか?