Re: [PERL] Tomt array driller

[Hans Schou <sslug@sslug>]

Peter Andreasen wrote:

>       if (defined($line[0]) and $line[0] and defined($line[14]) and
>               $line[14]) {

hmm, mon ikke det jeg bare skulle bruge var:
  if (defined($line[14]) && $line[14]) {
    $line[14] = "something";
  }

I tilfælde af at @line er tom, så skulle ovenstående blive fanget.
Hvis $line[14] er tom, så er det også forkert.

Det er iøvrigt en del af koden til SSLUG/AaLUG/FLUGs kalender.
http://www.sslug.dk/adict/makecal.pl
-- 
Hamletsgade 4 - 201, DK-2200 København N, Phone: +45 2264 8020
http://schou.dk
--------------------------------------------------------------
I'd put the Linux phenomenon really as threat No. 1.
                                              -- Steve Ballmer