Perl程序，打印某用户或某进程的相关进程树

原创Perl脚本，可打印进程树等。 Usage: /usr/bin/which_proc -u <user name> -p <process id> /usr/bin/which_proc -u <user name> /usr/bin/which_proc -p <process id> 输出： Processes tree for user "testuser": --> testuser, 14392, su - testuser --> testuser, 14393, -bash --> testuser, 13946, su - testuser --> testuser, 13947, -testuser