nicht angemeldet
Servus und vielen dank das klappt ja super!
Es klappt zwar aber ich verstehs nicht ganz ;-)
Es funktioniert doch folgender maßen:
Datei wird geöffnet mit tie, datei wird durchlaufen und die änderungen in @splices gespeichert der counter gibt an wie oft in der datei das suchende stück enthalten ist und gibt es an @splices (wenn jetzt also 8 leerzeichen enthalten sind wird dank $cnt nicht nur eines gelöscht sondern 8 also ist $cnt = 8 versteh ich das richtig). Danach wird die schleife beendet und die @splices schleife gestartet in der "splicet" man und es wird in der datei gespeichert?
Apropo mir scheint da noch etwas nicht klar zu sein wenn ich eine zeile lösche ist sie zwar weg aber die zeile existriert noch nun möcht ich diese zeile ganz löschen und eigentlich mach ich es doch richtig und in google find ich auch das gleiche aber es klappt einfach nicht hier ein codeschnipsel:
for( @dat ){
if($_ =~ m/^\s+/){
unshift( @splicers, $cnt );
}
$cnt++;
}
foreach( @splicers ){
splice( @dat, $_, 1);
}
das klappt nicht aber auch das klappt nicht
#mit tie geöffnet
for (@dat) {
s/^\s+//;
}
Was mach ich jezt schon wieder falsch?
Irgendwie lerne ich und lerne ich perl und weiss es aber wenn ich es anwende funktioniert nie was das macht keinen spaß mehr :-((
vielen vielen dank!