$VAR1 = [
          undef,
          1
        ];
Use of uninitialized value at ./p09.pl line 11.
 1
Not OK
$VAR1 = [
          undef,
          1
        ];