Opened by zipster at 2006-02-03 18:48
User since
2005-01-17
14749 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14749 Artikel
Admin1
So könnte eine die Spaltenposition und -breite anhand der ersten Zeeile herausbekommen.
Später lassen sich die Werte dann mit index heraustrennen
Es geht garantiert noch eleganter. Aber das habe ich gerade nicht parat.\n\n
<!--EDIT|GwenDragon|1139068995-->
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
my @pos;
my $s = <DATA>;
my $lastpos = 0;
while ( $s =~ /\s\s\S/g ) {
# Position, Länge
push( @pos, $lastpos, pos( $s ) - $lastpos - 1 );
$lastpos = pos($s);
}
Später lassen sich die Werte dann mit index heraustrennen
Es geht garantiert noch eleganter. Aber das habe ich gerade nicht parat.\n\n
<!--EDIT|GwenDragon|1139068995-->