Thread perl: leerzeilen entfernen (113 answers)
Opened by sabrina at 2006-08-07 10:33

sabrina
 2006-08-11 16:40
#68670 #68670
User since
2006-08-03
264 Artikel
BenutzerIn
[default_avatar]
@renee
ein ganz grosses danke schoen hier mein codeteil den ich veraendert habe
Code: (dl )
1
2
3
4
5
6
my $columns   = 5;

open(my $fh,'<',$file) or die $!;
while(my $line = <$fh>) {  # alles was unten in __DATA__ steht symbolisiert eine Datei
 chomp $line;
 my @array = (split(/[\t\s\\]/,$line))[0..($columns-1)];


es kommen keine fehlermeldungen und auch nicht zwischen drin mal irgend etwas was dort nicht hingehoert!
es steht sogar perfekt untereinander!
1000 mal danke!!
jetzt kann ich endlich weiter machen!danke
duerft ich mich bei dir melden falls ich wieder dumme fragen habe, versuch auch die duemmsten raus zu filtern ;-)
zum glueck gibt es dieses forum, danke
lg sabrina

View full thread perl: leerzeilen entfernen