#!/usr/bin/perl

use Inline 'C';
main();
__END__
__C__
int main()
{
  printf("foo\n");
  return 0;
}

##</code><code>##

$ ./826910.pl
Segmentation fault