perl -e 'use Inline C=>q{void greet(){printf("Hello, world\n");}};greet'