push @{$outp},
    (
        map {
           sprintf '"%s"=>"%s"', $_, $ahash{$_};
        } keys $ahash,
    ),
    @{$v};