$VAR1 = [
          bless( do{\(my $o = 1)}, 'B::SPECIAL' ),
          \'$k'
        ];
$VAR2 = [
          [],
          \'0.681204496723698'
        ];
$VAR3 = [
          bless( do{\(my $o = 1)}, 'B::SPECIAL' ),
          $VAR1->[1]
        ];
$VAR4 = [
          [],
          \'0.716383141555951'
        ];