SV* foo(int nr) {
    SV* out = NEWSV(535,nr);
    SvPOK_only(out);
    Zero(SvPVX(out), nr, char);
    SvCUR_set(out,nr);
    return (out);
}