/*
* Written by Alan Burlinson -- taken from his blog post
* at <http://blogs.sun.com/alanbur/date/20050909>.
*/
provider perl {
probe sub__entry(char *, char *, int);
probe sub__return(char *, char *, int);
};
/*
* Written by Alan Burlinson -- taken from his blog post
* at <http://blogs.sun.com/alanbur/date/20050909>.
*/
provider perl {
probe sub__entry(char *, char *, int);
probe sub__return(char *, char *, int);
};