Returning a string
use Inline 'C'; say borks(3); # BorkBorkBork __END__ __C__ SV* borks(int n) { SV* out = newSV(10); int i; SvPOK_on(out); for(i = 0; i < n; i++) { sv_catpv(out, "Bork"); } return out; }
use Inline 'C'; say borks(3); # BorkBorkBork __END__ __C__ SV* borks(int n) { SV* out = newSV(10); int i; SvPOK_on(out); for(i = 0; i < n; i++) { sv_catpv(out, "Bork"); } return out; }