in perl sub add_idle_callback($$) { printf("\nadd_idle_callback x%x , x%x \n", @_); &idle_callback_run(@_); # calls }