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
Du musst angemeldet sein, um einen Kommentar abzugeben.
Den
<
öffnet eine Datei zum Lesen. Verwenden>
öffnen einer Datei zum schreiben (oder>>
Anhängen).Es lohnt sich auch hinzufügen einige Fehlerbehandlung:
open
mit lexikalischen filehandles und Fehler überprüfen.-1 für nicht
print {$fh} $xml
InformationsquelleAutor Quentin