package FOO;

use Inline C => <<'EOC';

void hello() {
  printf("Hello from FOO\n");
}

EOC

package BAR;

use Inline C => <<'EOC';

void hello() {
  printf("Hello from BAR\n");
}

EOC

package FUBAR;

use Inline C => <<'EOC';

void hello() {
  printf("Hello from FUBAR\n");
}

EOC

FOO::hello();
BAR::hello();
FUBAR::hello();
hello();

##</code><code>##

Hello from FOO
Hello from BAR
Hello from FUBAR
Hello from FUBAR