웹솔루션개발 22년 노하우! 해피CGI의 모든것

[해피CGI][cgimall][perl] 현재 구동되는 파일명 구하기 본문

웹프로그램밍 자료실/알짜자료 골드팁

[해피CGI][cgimall][perl] 현재 구동되는 파일명 구하기

해피CGI윤실장 2016. 11. 22. 09:12

해피CGI 입니다.

php경우 $PHPSELF로 간단히 자신이 실행되는 파일을 불러오죠?

perl의 경우 약간은 잔머리를 굴려야 합니다. ^^

환경변수를 일단 사용하죠.


[프로그램코드]

$ENV{'SCRIPT_NAME'}



위 처럼 호출을 하게 되면 현재 구동되는 도메인을 제외한 부분의 디렉토리 및 파일명이 출력됩니다.

마지막 파일명을 추출해볼까요?


[프로그램코드]
@get_file_name = split(/\//,$ENV{'SCRIPT_NAME'});  #몽창  /로 잘라서 배열에 담습니다.
print "$get_file_name[$#get_file_name]"; #배열의 맨끝 녀석을 출력합니다



perl 참으로 매력있는 언어죠? ^^

 

 

 

홈페이지바로가기 

Comments