티스토리 뷰
CPAN(comprehensive Perl Archive Network)
모듈과 자료들의 집합
CPAN의 활용
개발지원 모듈
Www/html, http, cgi등
운영체제 인터페이스, 하드웨어 드라이버
서버와 데몬
문자열 처리, 언어처리, 해석과 검색
전자우표와 뉴스그룹
RSS 번역기 만들기
CPAN의 모듈 설치
직접 압축파일을 다운받아 설치
http://www.perl.com/cpan/ 에서 해당 모듈을 검색하여 다운 후 설치
프로그램을 이용하여 설치
Linux : cpan 명령을 이용하여 설치
Windows : cpan or ppm 명령을 이용하여 설치
CPAN의 모듈 설치
cpan > i /net/ #모듈을 검색
cpan > install NET::FTP //해당 모듈 설치
cpan > exit or q
설치한 모듈 매뉴얼 보기
Perldoc Net::FTP
파일검색
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | #File::find::Rule use strict; use File::find::Rule; my @path = ('d:\\' ); my @files = File::Find::Rule->file() ->name('*.txt' ) ->in( @path); for(@files){ print $_,"\n"; } | cs |
Win32::GuiTest
참고
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 | Pcap_lookupdev(\$err); UseNet::Pcap; My $err = ''; My $dev = Net::Pcap::Pcap_lookupdev(\$err); #네트워크 드라이브 장치를 리턴(eth0) My $pcap = Net::Pcap::pcap_open_live($dev,1000,1,0,\$err); 1000 = 1000 start Net::Pcap::pcap_loop($pcap,0,\&process_packet,"Just for the demo"); #\&process_packet <-캡처할 함수 호출 0:무제한 {몇 개나 받을껀지} Sub process_packet { #my ( $user_data, $header, $packet ) =@; Print $packet; #if($packet =~ /m_id=(.+?)&/gs; { Print $1 \n"; } } | cs |
'DEV > Perl' 카테고리의 다른 글
FILE (0) | 2015.12.23 |
---|---|
OOP (0) | 2015.12.21 |
정규표현식(Regular Expression) (0) | 2015.12.14 |
Package (0) | 2015.12.11 |
Subroutine (=함수) (0) | 2015.12.11 |
댓글
공지사항
최근에 올라온 글
최근에 달린 댓글
- Total
- Today
- Yesterday
링크
TAG
- 정답
- Java
- 인텔리 제이
- 직구
- 삼슉이
- 수리영역
- 시즌2
- Oracle
- 여행
- 해외
- 유휴시간
- phython
- 펄
- 무료
- 할인
- 데스트톱
- 조회
- 오피스
- font
- 베네수엘라
- 지니어스
- 쿠폰
- 신혼
- 개발폰트
- 바다
- 배달의민족
- 배민문방구
- 배민
- 오라클
- 직링
일 | 월 | 화 | 수 | 목 | 금 | 토 |
---|---|---|---|---|---|---|
1 | ||||||
2 | 3 | 4 | 5 | 6 | 7 | 8 |
9 | 10 | 11 | 12 | 13 | 14 | 15 |
16 | 17 | 18 | 19 | 20 | 21 | 22 |
23 | 24 | 25 | 26 | 27 | 28 | 29 |
30 | 31 |
글 보관함