Opened by misuzu at 2004-04-02 12:25
User since
2003-08-04
2536 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
2536 Artikel
ModeratorIn
lies das ganze zeile für zeile ein ...
schau, ob substr($zeile, 0, 1) eq 'T'
wenn, dann splite substr($zeile, 2, -1) mit /,/ (also
)
der letzt wert steht dann jeweils in @zeilenteile[-1].
schau, ob substr($zeile, 0, 1) eq 'T'
wenn, dann splite substr($zeile, 2, -1) mit /,/ (also
Code: (dl
)
my @zeilenteile = split(/,/, substr($zeile, 2, -1));
der letzt wert steht dann jeweils in @zeilenteile[-1].