Select Code to Download

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

Hello!
perl kk=0

my $kk = kk();
print "perl kk=$kk\n";
...
         return(0);
     }
END_OF_C_CODE

#include <stdio.h>
#include <stdlib.h>
...
   result = kk();
   printf("result was %d\n",result);
}