perldtrace.d

   1 /*
   2  * Written by Alan Burlinson -- taken from his blog post
   3  * at <http://blogs.sun.com/alanbur/date/20050909>.
   4  */
   5
   6 provider perl {
   7     probe sub__entry(char *, char *, int);
   8     probe sub__return(char *, char *, int);
   9 };
  10
  11 /*
  12  * Local Variables:
  13  * tab-width: 4
  14  * indent-tabs-mode: nil
  15  * End:
  16  *
  17  * ex: set ts=8 sts=4 sw=4 noet:
  18  */