*CORE::GLOBAL::getppid = sub () {
    return "Hello world!\n" . CORE::getppid();
};
1;