caller.pm

use Hello;

thingy();

Hello.pm

use PB 'omg.proto';

PB.pm

use PB::Grammar;
use PB::Actions;

module PB;

sub parse-idl-str($protofile) is export {
    my $actions = PB::Actions.new();
    my $result;
    die "unable to parse file" 
        unless $result = PB::Grammar.parse($protofile, :actions($actions));
    $result.ast;
}

sub parse-idl-file($filename) is export {
    my $protofile = slurp(open $filename);
    parse-idl-str($protofile);
}

our sub EXPORT(*@args) {
    say "args: ", @args.perl;
    EXPORT_SYMBOL('&thingy', [<ALL DEFAULT>], sub { say "hello" });
    return {};
}