$ perl -wMstrict -MIPC::Run=run -e' my $r = run "pstree -A $$" '
perl---sh---pstree