my $kk = kk();
print "perl kk=$kk\n";

use Inline C => <<'END_OF_C_CODE';
   #include <stdio.h>
   #include <stdlib.h>
   #include <string.h>
   int kk () {
     printf("Hello!\n");
         return(0);
     }
END_OF_C_CODE