Opened by mordur at 2004-05-11 11:49
oder auch so:
Code: (dl
)
1
2
3
4
5
6
7
foreach $part (@altes_array) {
$part =~ /\n/
? do {
(push @neues_array, $_) foreach (split /\n/, $part)
}
: (push @neues_array, $part);
}