Server : Apache System : Linux server1.cgrithy.com 3.10.0-1160.95.1.el7.x86_64 #1 SMP Mon Jul 24 13:59:37 UTC 2023 x86_64 User : nobody ( 99) PHP Version : 8.1.23 Disable Function : NONE Directory : /usr/share/doc/perl-devel-5.16.3/ |
/* Example of the perl systemtap tapset shows a nested view of perl subroutine calls and returns across the whole system. To run: stap perl-example.stp (for all perl processes) For specific perl process: stap perl-example.stp -c COMMAND */ probe perl.sub.call { printf("%s => sub: %s, filename: %s, line: %d, package: %s\n", thread_indent(1), sub, filename, lineno, package) } probe perl.sub.return { printf("%s <= sub: %s, filename: %s, line: %d, package: %s\n", thread_indent(-1), sub, filename, lineno, package) }