#include <stdlib.h>
#include <stdio.h>
#define p \
<<END
set // [if 0 {
;
int main() {
  /* }}];
  puts "Hello world from Tcl!"
  if 0 { { */
  printf("Hello world from C!\n");
  return 0;
}
/*
END
;
print("Hello world from Perl!\n");
<<quit
}
exit
REBOL []
print "Hello world from REBOL!"
quit
;#*/