Select Code to Download

use strict ;
use warnings ;
...
int my_puts(PerlIO* fh) {
  return PerlIO_puts(fh, "Hello World !!\n") ;
} ;