HTML Seite generieren - #53294 (Allgemeines zu Perl)

Reugla John

2005-04-12 16:05

User since
2005-04-05
15 Artikel
BenutzerIn
[default_avatar]

Meine Zeile sieht jetzt so aus

Code (perl): (dl )

sub process_do
{
    my $self = shift;

    my %errors = (
        1 => 0,
        2 => 0,
        3 => 0,
    );
    
    while (<FILE_IN>) {
        my ($errortype) =~ /\s+(\d+)\s+">/;

        next unless $errortype;

        $errors{$errortype}++;
    }

    $self->{data}{errors} = \%errors;
}

aber ich bekomme folgende Fehlermeldung

Use of unitialized value in pattern match (m//) at projekt.pl line 96

Line 96 ist

Code (perl): (dl )

my ($errortype) =~ /\s+(\d+)\s+">/;