renee+2009-01-14 15:27:43--

$errormaplist ist kein Array sondern ein Filehandle. Du kannst jetzt entweder alles in ein Array lesen und dann das Element ausgeben oder aber - was besser ist - Du durchläufst die while-Schleife und gibst die Zeile aus, wenn es die gewünschte Zeile ist:

Code: (dl )

1
2
3
4
5
6
7
8
9

sub errorcode {
    my ($linenr) = @_;

    open my $errormap, '<', 'errormap.txt' or die $!;
    my @lines = <$errormap>;
    close $errormap;

    print $lines[ $linenr-1 ];
}

Ich habe mich erstmal für diese Variante entschieden weil sie für mich erst Mal am einfachsten ist und ich mit arrays arbeiten kann. Danke für die Erklärung mit dem FIlehandle und array, jetzt weiß ich warum das nicht geklappt hat.


@FoolAck
Was ist $foo? Das Programm läuft jetzt sauber, ohne Fehlermeldungen vom Interpreter durch.


@Linuxer:
Jetzt können wir uns an das objektoriente ranmachen. Ich werde es natürlich erstmal selber versuchen. Ich denke das hier: http://www.infos24.de/perle/handbuch/14_objektorie... verstehe ich einigermaßen.