Revision c02626dc
Von Moritz Bunkus vor etwa 9 Jahren hinzugefügt
SL/DATEV.pm | ||
---|---|---|
958 | 958 |
print(EV $ev_header); |
959 | 959 |
|
960 | 960 |
foreach my $file (@ed_versionset) { |
961 |
print(EV $ed_versionset[$file]);
|
|
961 |
print(EV $file);
|
|
962 | 962 |
} |
963 | 963 |
close(EV); |
964 | 964 |
### |
Auch abrufbar als: Unified diff
DATEV: Dateinamen richtig in EV-Datei schreiben
Ein foreach über ein Array weist der Iteratorvariablen die Inhalte zu,
nicht die Indizes ins Array. Also die Variable nicht noch mal ans Index
nutzen.
Fun fact: das war mindestens seit dem perltidy-Commit in 2005 kaputt.