Lines Matching refs:elem
252 for $elem (@$seq) {
253 if ($$elem[0] eq 'EXEC') {
254 my $argv = $$elem[2];
255 print "$$elem[0] $$elem[1] @$argv\n";
256 } elsif ($$elem[0] eq 'FORK') {
257 print "$$elem[0] $$elem[1]\n";
259 print "$$elem[0]\n";
268 for $elem (@$seq) {
269 if ($$elem[0] eq 'EXEC') {
270 return $elem;
296 for $elem (@seq) {
298 if ($$elem[0] eq 'EXEC') {
299 my $argv = $$elem[2];
306 } elsif ($$elem[0] eq 'FORK') {
309 display_pid_trace($$elem[1], "$lead--+--");
311 display_pid_trace($$elem[1], "$lead +--");
314 display_pid_trace($$elem[1], "$lead `--");
316 display_pid_trace($$elem[1], "$lead +--");
