준호씨의 블로그

하나의 시스템에서 여러버전의 개발언어를 설치 하고 스위칭 해가며 사용해야 될 경우가 있다. node 에는 nvm, java 에는 jenv 가 있듯이 perl 에는 perlbrew 가 있다. https://perlbrew.pl/ 에 가서 설치 가이드를 따라 설치 해서 사용 하면 된다. 설치 \curl -L https://install.perlbrew.pl | bash curl 이 없다면 # Linux \wget -O - https://install...

new IO::Socket::INET... 그냥은 timeout 이 잘 동작 하지 않음 alarm 을 이용해야 한다. 자세한건 차차 정리 참고 alarm IO::Socket::Timeout: socket timeout made easy How to timeout and proceed in perl? IO::Socket::INET

use POSIX 'strftime'; my $date = strftime '%Y%m%d', localtime; print $date; result $ perl test.pl 20171115관련글perl - n일 전 날짜 구하기references http://www.perlmonks.org/?node_id=673547

recv 의 리턴값은 socket 프로토콜이 지원한다면 sender 의 address 이다. 그렇지 않으면 빈 문자열을 리턴한다. 실패시 undefined 를 리턴한다. Socket 의 recv 도 마찬가지이다. 에러시 -1 을 리턴 하도록 처리 하는 예시 my $ret = $sock->recv($buf, 1024); return -1 unless (defined $ret); # recv fail 참고 https://perldoc.perl.or..

yyyy-mm-dd hh:mm:ss Time::Piece 로 localtime 에 strftime 함수 추가해서 사용하기 use Time::Piece; print localtime->strftime('%F %T'); Time::Piece 모듈을 사용하게 되면 localtime 에 strftime 함수가 오버라이드 된다. Time::Piece 모듈은 Perl 5.10 부터 기본 모듈로 들어가 있다. 만약 없다면 cpan 으로 설치 해 주면 ..