Lines Matching refs:elem
254 for $elem (@$seq) {
255 if ($$elem[0] eq 'EXEC') {
256 my $argv = $$elem[2];
257 print "$$elem[0] $$elem[1] @$argv\n";
258 } elsif ($$elem[0] eq 'FORK') {
259 print "$$elem[0] $$elem[1]\n";
261 print "$$elem[0]\n";
270 for $elem (@$seq) {
271 if ($$elem[0] eq 'EXEC') {
272 return $elem;
298 for $elem (@seq) {
300 if ($$elem[0] eq 'EXEC') {
301 my $argv = $$elem[2];
308 } elsif ($$elem[0] eq 'FORK') {
311 display_pid_trace($$elem[1], "$lead--+--");
313 display_pid_trace($$elem[1], "$lead +--");
316 display_pid_trace($$elem[1], "$lead `--");
318 display_pid_trace($$elem[1], "$lead +--");
