'help/Perl script'에 해당되는 글 2건

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 (@배열명) { 

   실행문장 ;

}