Hallo!
Ich bin dabei ein PHP-Script in ein PERL-Script zu übersetzen. An 2 Stellen habe ich aber Probleme:
1. Daten aus Dateihandle in String/Array schreiben:
open DATEN, "test.txt";
soweit so gut, mit print DATA "hallo"; kann ich ja "hallo" in die Datei schreiben, aber wie schreibe ich den Inhalt der Datei in eine Variable? Möglichst zeilenweise in einen Array(siehe 2.)!
2. Sting in einen Array zerlegen, Gegenstück zu explode("|",$daten_string) in PHP!
So sieht das ganze genau in PHP aus:
<?php
$data = fopen($file, "r");
$recordsets = fread($data,filesize($file));
fclose($data);
$data_zeilen = explode("\n",trim($recordsets));
foreach ($data_zeilen as $tmp) {
$data_array[] = explode("|", $tmp);
}
?>
Jetzt habe ich mit $data_array einen 2-Dimensionalen Array. Aber leider kennt PERL nicht dieselben Funktionen, kann mir vielleicht jemand auf die Sprünge helfen? Leider kenne ich kein vergleichbares Manual wie das von PHP!
Viel Grüße
Andreas