perl_call_pv("module::sub", G_EVAL|G_DISCARD|G_NOARGS|G_VOID) ;