준호씨의 블로그

파일 하나 삭제 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

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

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