bind(\&debug, "Entering xxx()");
...
bind(\&logit, "Username : $user logged in")
... and so on...