목록개발자 이야기/Perl (52)
동글동글 라이프
얼마전 해커쏜에 참여하여 간단한 프로그램을 하나 만들었다. 그 당시 a3r0님께 많은 도움을 받아서 그것을 바로 흡수!! 타자 및 투수의 정보까지 처리하는 루틴까지 만들었던 기억이 난다. 소개하자면 일명 Baseball::KBO 한국야구위원회(http://www.koreabaseball.com/ )를 참고하여 만들어 졌으며 이 사이트의 정보들을 LWP::Simple 모듈을 이용하여 웹에서 해당 정보들을 얻어온 뒤 정규식을 이용해서 원하는 정보들을 찾아 저장하는 형식으로 코드를 작성하였다. 그 뒤 GTK문서를 보고 적당한 예제가 하나 있어 그 예제를 참고하여 GUI모드로 구현을 해보았다. 소스는 허접하지만... 누군가 더 나은 코드를 코멘트로 적어 줄까 싶어 공개한다. 블로그를 시작한지 글을 8건이나 썼는..
perl 쿡북에 있는 예제중 뼈가대고 살이되는 것들을 골라내어 정리해보았다. 1. 정규표현식을 사용하여 통해서 3번째 값을 찾는 코드이다. if문을 적절하게 사용하였고 /g 변경자를 사용하여 전체 매치를 시켜 3번째 값을 찾아냈다. 1 2 3 4 5 6 7 8 9 use strict; $_ = "one fish two fish red fish blue fish"; my $WANT = 3; my $count = 0; while(/(\w+)\s+fish\b/gi){ if(++$count ==$WANT){ print "The Third fish is a $1 one."; } } Output: 1 The Third fish is a red one. 2. 일치한 문자중 짝수번째 fish를 찾아낸다. grep은 매..