AH $VAR1 = [
          bless( {}, 'Foo' ),
          {
            '@' => {},
            '!' => '-1'
          }
        ];
Segmentation fault