준호씨의 블로그

exit value 구하는 방법 system 함수를 실행하면 결과 정보가 $? 에 담겨진다. 8bit 를 버리고 나면 $? >> 8; 예제 exit5.pl 코드를 작성하고 5 로 종료 하는 코드를 작성한다. exit 5; testexit.pl 코드를 작성한다. system("perl", "exit5.pl"); printf "%d\n", $? >> 8; 코드를 실행해 보면 exit 5 로 넘겨 받은 값이 출력되는 것을 볼 수 있다. $ perl testexit.pl 5 perldoc 의 system 에 있는 예제를 참고 하도록 한다. if ($? == -1) { print "failed to execute: $!\n"; } elsif ($? & 127) { printf "child died with sig..

파일 하나 삭제 unlink $file; 리스트의 파일 삭제 unlink @files; 조건에 해당 하는 파일 삭제. *.bak 삭제 방법 unlink glob "*.bak"; 참고 unlink - perldoc 펄에서 파일 이동/복사/이름변경 방법 glob - perldoc

use Net::Address::IP::Local; my $ip = Net::Address::IP::Local->public; print $ip; $ perl ip.pl 14.47.186.209 참고 http://search.cpan.org/~jmehnle/Net-Address-IP-Local-0.1.2/lib/Net/Address/IP/Local.pm

var params = { width:1680, height:1050 }; var str = jQuery.param( params ); 결과 width=1680&height=1050 참고 jQuery.param()

git 에서는 기본적으로 대소문자 변경해도 같은 파일로 인식한다. podfile 을 Podfile 로 바꾸고 싶어서 mv podfile Podfile 해도 바뀐 파일로 인식 하지 않는다. 이럴 때는 force 옵션으로 강제 변환이 가능하다. git mv --force podfile Podfile