$ perl mycode.pl filename > ~/MyPerl/result_ans/filename.out