실행중인 펄 실행 파일의 출처 확인

Question

개발자보다 서버 관리자 관점에서 더 많은 관심을 보입니다. 현실 세계 예를 들어

, 나는 보여줍니다 추신 AUX IN 라인이 있다고 가정 :

usercom 1696 0.1 0.2 34104 4556 ?  Ss 07:33 0:20 ./mail 

없는이 펄 스크립트입니다 본질적으로 명백하다,하지만 나는 "이 일을하는 것입니다 확인할 수 있습니다 (다른 것들에 추가) 렌더링하는 "-p 1696 lsof를 :

COMMAND PID  USER FD TYPE  DEVICE SIZE  NODE NAME 

perl 1693 usercom txt REG  0,49 17326 99846241 /home/virtfs/usercom/usr/local/bin/perl 

그래서 이것은 (오픈 VZ에서) 사용자가 펄 인터프리터에서 실행되는 스크립트가 있음을 알려줍니다.

이 스크립트의 cwd를 보면 "mail"실행 파일이없는 디렉토리가 생성됩니다.

질문 (서버 관리자의 관점에서) 현재 실행중인 perl 코드의 "원점"을 결정하는 몇 가지 기술은 무엇입니까? $ 0은 매우 쉽게 조작되므로 실행중인 펄 스크립트의 "소스"를 절대적으로 결정할 수있는 방법이 없다는 것을 받아 들였습니다. 또한 코드를 perl로 파이프하거나 평가할 수도 있습니다. 그럼에도 불구하고 펄 스크립트의 근원을 추적하는 좋은 방법을 아는 사람이 있습니까?

Answer 1

'lsof'의 출력에서 ​​'cwd'(현재 작업 디렉토리) 행을 찾으십시오.

localhost proC# ps ax | grep test 
4751 pts/18 S+  0:00 sh test.sh 

localhost proC# lsof +p 4751 
COMMAND PID USER FD TYPE DEVICE SIZE/OFF  NODE NAME 
sh  4751 user cwd DIR 8,3 12288 4964356 /home/user 
<CLIP> 
localhost proC#  

그냥 스크립트를 옮겨서 다시 시도해 보았습니다.

localhost 4848 # ls -l 
total 0 
<CLIP> 
lrwxrwxrwx 1 user user 0 Feb 13 18:51 cwd -> /home/user/bin 
<CLIP> 
localhost 4848 # 

희망 :

user@localhost ~ $ mv test.sh bin/ 
user@localhost ~ $ cd bin 
user@localhost ~/bin $ sh test.sh 

localhost proC# ps ax | grep test 
4848 pts/18 S+  0:00 sh test.sh 

localhost proC# lsof +p 4848 
COMMAND PID USER FD TYPE DEVICE SIZE/OFF  NODE NAME 
sh  4848 user cwd DIR 8,3  4096 4965757 /home/user/bin 
<CLIP> 
localhost proC# 

당신이에서 볼 수있다 'lsof를' '/ proc 디렉토리/$ PID를 /'디렉토리에 의존하고 위치를 'CWD'심볼릭 링크를 표시하지 않으려면

변경 '$ 0'

user@localhost ~/bin $ ./test.pl 

localhost 4848 # ps ax | grep test 
5004 pts/17 S+  0:00 grep --colour=auto test 

localhost 4848 # ps ax | grep bogus 
5002 pts/18 S+  0:00 bogus.pl 
5006 pts/17 R+  0:00 grep --colour=auto bogus 

localhost 5002 # lsof +p 5002 
COMMAND PID USER FD TYPE DEVICE SIZE/OFF  NODE NAME 
test.pl 5002 user cwd DIR 8,3  4096 4965757 /home/user/bin 
<CLIP> 
localhost 5002 # 


localhost ~ # cd /proc/5002/ 
localhost 5002 # ls -l 
total 0 
<CLIP> 
lrwxrwxrwx 1 user user 0 Feb 13 19:12 cwd -> /home/user/bin 
<CLIP> 

파일 '/ proc 디렉토리/$ PID를/상태'가 또는 포함 된 Perl 스크립트로 이것을 테스트 : 그

편집하는 데 도움이 ... iginal 스크립트 이름 :