Scrapped Articles 썸네일형 리스트형 Perl - 특정 경로이하 또는 파일에서 특정 문자열을 원하는 문자열로 변경 #! /usr/bin/perl -w# PERL Scripted by bando# DATE : 20040805# Mail : bando(0x40)bando.org# MSN : bando(0x40)bando.org# 특정 경로이하 또는 파일에서 특정 문자열을 원하는 문자열로 변경하는 펄 스크립트 if ( $#ARGV != 2 ) {&Usage();} $Chan_path = $ARGV[0];$Chan_ch = $ARGV[1];$Chand_ch = $ARGV[2];$total = 0; if ( ! -e $Chan_path) {print "$Chan_path 와 같은 파일이나 디렉토리는 없습니다!n";exit 1;} @arry = `grep "$Chan_ch" -l -r $Chan_path`; foreach(0... 더보기 이전 1 다음