A perl like Proc::Pidfile for go