Opened by oruebe at 2004-12-23 19:09
User since
2003-08-06
2257 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-06
2257 Artikel
ModeratorIn
[quote=jemand,23.12.2004, 19:17]ich würde hier mal folgendes ausprobieren:
[/quote]
Oh, hättste es mal getan! =)
Der Code ist mehr als falsch, er funktioniert auch nicht.
Der Index der Letzten Position in einem Array ist die Zahl seiner Elemente minus 1. Das liegt daran, daß die Elemente eines Arrays mit 0 losgezählt werden, 5 Elemente hätten also die Indizes 0 .. 4.
Ein Arrayelement wird in Perl mit $arrayname[INDEX] angesprochen, INDEX ist eine Zahl. Diese Zahl kann komische Formen annehmen, oder auch in einer Variable stehen.
Die folgenden Wege gehen gut:
Code: (dl
)
1
2
3
4
5
my @zeilen = <DATEI>;
close(DATEI);
$zeilenanzahl = @zeilen;
my $letzteZeile = @zeilen[$zeilenanzahl];
Oh, hättste es mal getan! =)
Der Code ist mehr als falsch, er funktioniert auch nicht.
Der Index der Letzten Position in einem Array ist die Zahl seiner Elemente minus 1. Das liegt daran, daß die Elemente eines Arrays mit 0 losgezählt werden, 5 Elemente hätten also die Indizes 0 .. 4.
Ein Arrayelement wird in Perl mit $arrayname[INDEX] angesprochen, INDEX ist eine Zahl. Diese Zahl kann komische Formen annehmen, oder auch in einer Variable stehen.
Die folgenden Wege gehen gut:
Code: (dl
)
1
2
3
4
5
6
7
my $letzte_zeile = pop @zeilen;
# oder auch
$letzte_zeile = $zeilen[ -1 ];
# oder auch
$letzte_zeile = $zeilen[ $#zeilen ];
# oder auch
$letzte_zeile = $zeilen[ $zeilenzahl - 1 ];
Erst denken, dann posten --
27. Deutscher Perl- u. Raku -Workshop 12. bis 14. Mai 2025 in München.
Winter is Coming
27. Deutscher Perl- u. Raku -Workshop 12. bis 14. Mai 2025 in München.
Winter is Coming