1N/A * pl_cputime.d - measure Perl on-CPU times for subroutines. 1N/A * Written for the Perl DTrace provider. 1N/A * $Id: pl_cputime.d 41 2007-09-17 02:20:10Z brendan $ 1N/A * This traces Perl activity from all programs running on the system with 1N/A * Perl provider support. 1N/A * USAGE: pl_cputime.d # hit Ctrl-C to end 1N/A * FILE Filename of the Perl program 1N/A * NAME Name of call (subroutine name) 1N/A * TOTAL Total on-CPU time for calls (us) 1N/A * Filename and subroutine names are printed if available. 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(
" %-20s %-10s %-32s %8s\n",
"FILE",
"TYPE",
"NAME",
"COUNT");
1N/A printf(
"\nExclusive subroutine on-CPU times (us),\n");
1N/A printf(
" %-20s %-10s %-32s %8s\n",
"FILE",
"TYPE",
"NAME",
"TOTAL");
1N/A printf(
"\nInclusive subroutine on-CPU times (us),\n");
1N/A printf(
" %-20s %-10s %-32s %8s\n",
"FILE",
"TYPE",
"NAME",
"TOTAL");