in reply to printing options with elsif statement

It might be better to write Filehandles in all UPPERCASE, because if you use perl -w, it will tell you some warnings. If any errors happen with open, they are in the special variable $!
E.g:
open (IN, "tascomod.log") or die ("can not open file: !"); open (OUT, ">tasmodtypfinrpt.txt") or die ("cannot open output: $!");