Opened by sabrina at 2006-08-07 10:33
User since
2003-08-04
1706 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
1706 Artikel
HausmeisterIn
Also ich würde deine While-Schleife eher so aufziehen:
Ich benutze die SpezialVariable $. die den Linecounter für Filehandles darstellt anstelle von $i.
$i inkrementiere ich nur, wenn die aktuelle Zeile keine Leerzeile ist.
Ach ja und deine doppelt verschachtelte for-Schleife brauchst du dann nicht mehr.
Klar?
Gruß Alex\n\n
<!--EDIT|format_c|1154946982-->
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
while (<DATA>) {
if ($.==1) {
# Something
}
else {
unless (/^\s*$/) {
$matrix[1][$i++]=$_;
}
}
}Ich benutze die SpezialVariable $. die den Linecounter für Filehandles darstellt anstelle von $i.
$i inkrementiere ich nur, wenn die aktuelle Zeile keine Leerzeile ist.
Ach ja und deine doppelt verschachtelte for-Schleife brauchst du dann nicht mehr.
Klar?
Gruß Alex\n\n
<!--EDIT|format_c|1154946982-->