neversaint$ perl mycode.pl sn 5