Opened by sabrina at 2006-08-30 11:40
User since
2006-08-03
264 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-08-03
264 Artikel
BenutzerIn
ja genau, danke du bist ein schatz es funktioniert einwandfrei,
hat es jetzt an der kurzlebigkeit gelegen oder nicht?
in deinem code hast du das ja umgangen da du alles in eine schleife geschrieben hast oder?
kannst du mir vielleicht auch bei meinem anderen problem helfen?
es werden keine ; als trenner ausgegeben alle leerzeichen trenner sollen durch ; ersetzt werden
weis vielleicht irgend wer warum das nicht geht
das soll rauskommen:
@GwenDragon
es wird etwas uebergeben oder?
oder wie hast du das gemeint?
lg sabrina\n\n
<!--EDIT|sabrina|1157962816-->
hat es jetzt an der kurzlebigkeit gelegen oder nicht?
in deinem code hast du das ja umgangen da du alles in eine schleife geschrieben hast oder?
kannst du mir vielleicht auch bei meinem anderen problem helfen?
es werden keine ; als trenner ausgegeben alle leerzeichen trenner sollen durch ; ersetzt werden
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
while(my $line = <FH>) {
chomp $line;
my @array = (split(/[\t\s\\]/,$line))[0..($columns-1)];
foreach (@array) {
s/^\s+/;/g; ##anfang
s/\s+/;/g; ##mitte
s/\s+$/;/g; ##ende
} # foreach
if($line =~ /\bBLUBB(?:ER)?\b/ and $line !~ /\bSAND\b/){
push(@data,[@array]);
}
} # while weis vielleicht irgend wer warum das nicht geht
das soll rauskommen:
Code: (dl
)
1
2
3
4
Sabrina;Gehring;BLUBB;70854125
Anita;Mueller;BLUBB;78459614
Jens;Meier;BLUBBER;84578964
@GwenDragon
es wird etwas uebergeben oder?
oder wie hast du das gemeint?
lg sabrina\n\n
<!--EDIT|sabrina|1157962816-->