C

script in c

#!/usr/bin/perl
use Inline C;
exit main0();
__END__
__C__
#include <stdio.h>

int main0()
{
   printf("Hello world !
");
   return 0;
}

script in c

$ chmod +x test1.c
$ ./test1.c
> Hello world !

script in c

#!/usr/bin/perl
use Inline C;
$arg = $ARGV[0];
$arg = tr/[a-z]/[A-Z]/; # modification du paramètre
exit main0($arg);
__END__
__C__
#include <stdio.h>

int main0(char *arg1)
{
   printf("Hello %s 
",arg1);
   return 0;
}