So drucken Sie eine variable, um eine Datei in Perl?

Ich bin mit dem folgenden code versuchen, zu drucken, eine variable in die Datei.

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

So print $xml druckt die korrekte Ausgabe auf dem Bildschirm. Aber print FILE $xml nicht tun.

Warum funktioniert das drucken in eine Datei Zeile nicht funktionieren? Perl scheint oft haben diese Dinge, die einfach nicht funktionieren...

Für die Datei drucken Zeile zu arbeiten, ist es notwendig, dass die Datei bereits vorhanden ist?

InformationsquelleAutor user788171 | 2013-01-14

Schreibe einen Kommentar