[Perl script] 기본 문법

- open/close : 파일 입출력

open IN_FILE, "<:encoding(euc-kr)", "파일명.txt" or die can't open data file\n" ;

open RESULT_FILE, ">:encoding(euc-kr)", "파일명.sql" or die can't open data file\n" ;

~~~~

close(IN_FILE);

close(RESULT_FILE);

- foreach : 배열과 사용하는 반복문

foreach (@배열명) { 

   실행문장 ;

}