our $AUTOLOAD;
sub AUTOLOAD {
    if( $AUTOLOAD =~ /.*?::function_(\w+)$/ ) {
        function_x( $1 );
    } else {
        die "Unknown function '$AUTOLOAD' called";
    };
}