1N/A * pl_flow.d - snoop Perl execution showing subroutine flow. 1N/A * Written for the Solaris Perl DTrace provider. 1N/A * $Id: pl_flow.d 41 2007-09-17 02:20:10Z brendan $ 1N/A * This traces Perl activity from all Perl programs on the system 1N/A * running with Perl provider support. 1N/A * USAGE: pl_flow.d # hit Ctrl-C to end 1N/A * This watches Perl subroutine entries and returns, and indents child 1N/A * TIME(us) Time since boot, us 1N/A * FILE Filename that this subroutine belongs to 1N/A * SUB Subroutine name 1N/A * -> subroutine entry 1N/A * <- subroutine return 1N/A * WARNING: Watch the first column carefully, it prints the CPU-id. If it 1N/A * changes, then it is very likely that the output has been shuffled. 1N/A * COPYRIGHT: Copyright (c) 2007 Brendan Gregg. 1N/A * The contents of this file are subject to the terms of the 1N/A * Common Development and Distribution License, Version 1.0 only 1N/A * (the "License"). You may not use this file except in compliance 1N/A * See the License for the specific language governing permissions 1N/A * and limitations under the License. 1N/A * 09-Sep-2007 Brendan Gregg Created this. 1N/A printf(
"%3s %-16s %-16s -- %s\n",
"C",
"TIME(us)",
"FILE",
"SUB");