XML file auslesen

[Struppi]

Ich mach mal hier weiter, weil ich sehe du benutzt ja auch CGI.pm

Was heißt übrigens klappt nicht? Das ist eine sehr dürftige Fehlerbeschreibung.

use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:standard);

print header('text/plain');

my $path    = "xml";

open(FHD, "<$path/test.xml");

Immer checken ob's geklappt hat!

open FHD, "<$path/test.xml" || die "konnte $path/test.xml nicht zum lesen öffnen, weil: $!";

my @lines=<FHD>;

chomp(my @lines=<FHD>);

close (FHD);
foreach my $array(@lines)
{
  chomp($array);
  print "$array\n";

Aber, warum entfernst du erst die Newlines und machst sie dann wieder rein?

}

wenn ich die "test.xml" mit "bla.txt" ersetze, dann funktioniert das Lesen und Ausgeben.

Tja, was sagst das Skript, wenn du das öffnen der Datei Kontrollierst?

Ansonsten sollte das Skript laufen.

Struppi.