如何在Perl中将变量打印到文件中？

我正在使用以下代码尝试将变量打印到文件中

my $filename = "test/test.csv";
open FILE, "<$filename";
my $xml = get "http://someurl.com";
print $xml;
print FILE $xml;
close FILE;

my$filename=“test/test.csv”；
打开文件，“该
打开一个文件进行写入（或使用
>
进行追加）

还值得添加一些错误处理：

use strict;
use warnings;
use LWP::Simple;

my $filename = "test/test.csv";
open my $fh, ">", $filename or die("Could not open file. $!");
my $xml = get "http://example.com";
print $xml;
print $fh $xml;
close $fh;

+1对于三参数版本的
打开
，使用词法文件句柄和错误检查。