Lines Matching full:my

21 my %reads;
22 my %writes;
26     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
42     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
53     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
64     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
82     foreach my $pid (sort { ($reads{$b}{bytes_read} || 0) <=>
84 	my $comm = $reads{$pid}{comm} || "";
85 	my $total_reads = $reads{$pid}{total_reads} || 0;
86 	my $bytes_requested = $reads{$pid}{bytes_requested} || 0;
87 	my $bytes_read = $reads{$pid}{bytes_read} || 0;
99     my @errcounts = ();
101     foreach my $pid (keys %reads) {
102 	foreach my $error (keys %{$reads{$pid}{errors}}) {
103 	    my $comm = $reads{$pid}{comm} || "";
104 	    my $errcount = $reads{$pid}{errors}{$error} || 0;
111     for my $i (0 .. $#errcounts) {
123     foreach my $pid (sort { ($writes{$b}{bytes_written} || 0) <=>
125 	my $comm = $writes{$pid}{comm} || "";
126 	my $total_writes = $writes{$pid}{total_writes} || 0;
127 	my $bytes_written = $writes{$pid}{bytes_written} || 0;
141     foreach my $pid (keys %writes) {
142 	foreach my $error (keys %{$writes{$pid}{errors}}) {
143 	    my $comm = $writes{$pid}{comm} || "";
144 	    my $errcount = $writes{$pid}{errors}{$error} || 0;
151     for my $i (0 .. $#errcounts) {
159 my %unhandled;
173     foreach my $event_name (keys %unhandled) {
180     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,