In Datei schreiben funktioniert nicht? (Allgemeines zu Perl)

[thread]16943[/thread]

In Datei schreiben funktioniert nicht?

Tags: perl5 datei Similar Threads

Readers: 20

Articles: hide open all | hide show old branches

+2 replies
guest kibreitw

2011-11-25 13:15
Hallo,

ich hab mich jetzt ca 3 Stunden mit meinem Problem rumgequält, aber ich komm nicht weiter.
In meinem Perl-Skript erstelle ich ein Hash aus Arrays.

Jetzt gehe ich in meiner ersten Schleife den Hash durch:
Code (perl): (dl )

foreach my $region(%$data) {
dann öffne ich eine Datei (wie genau die heisst ist ja egal, sie wird auf jeden Fall richtig erstellt):
Code (perl): (dl )

open(CSV, ">$filePath$fileName")
Jetzt kann ich ohne Probleme was in die Datei schreiben, außer ich versuche es innerhalb einer zweiten Schleife:
Code (perl): (dl )

foreach(@{$data->{$region}}) { print CSV "a\n"; }
Wie man sieht, schreibe ich in dem Fall nichtmal was aus den Arrays in die Datei, was ich später natürlich tun will. Wenn ich das CSV wegnehme, bekomme ich zwei a's ausgegeben, also in die Schleife geht Perl auf jeden Fall.

Später schließe ich die Datei natürlich noch.

...was mach ich falsch?
Last edited: 2011-11-25 13:37:58 +0100 (CET)
- Linuxer
  
  2011-11-25 14:02
  User since
  2006-01-27
  3891 articles
  HausmeisterIn
  Liefer mal zusammenhängenden Code, der das Fehlverhalten darstellt.
  Aus den Fragmenten ist schwer was zu lesen...
  
  Was allerdings auffällt: mit foreach my $region(%$data) { iterierst Du über die Keys und Values des Hash ... willst Du das wirklich?
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8
  
  my $hRef = { a => 1, b => 2, }; for my $bla ( %$hRef ) { print $bla, "\n"; }
  
  ergibt
  
  Code: (dl )
  
  1 2 3 4
  
  a 1 b 2
  
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

View all threads created 2011-11-25 13:15.