delete $values[1];
delete $values[3];
print Dumper \@values;
# generates the output:
$VAR1 = [
          '00',
          undef,
          '22',
          ${\$VAR1->[1]},
          '44',
          ${\$VAR1->[1]},
          '66'
        ];