PERL SUB 모듈에서 파라미터 받기

SHIFT를 사용해서 하나씩 assign 할수도 있고

@_를 가지고 하나씩 변수를 할당할수도 있다.

my $keywords_file = shift;

my $output_file   = shift  || "news.output.txt"; my $keywords_file=@_[0] my $keywords_file=@_[1]