Trial 1
1 : TGCAATCACTAGCAAGCTCTCGCTGCCGTCACTAGCCTGTGG
2 : GGGGCTAGGGTTAGTTCTGGANNNNNNNNNNNNNNNNNNNNN
seek() on closed filehandle INFILE at test.pl line 10.
Trial 2
readline() on closed filehandle INFILE at /usr/lib/perl5/site_perl/5.8.0/Bio/Root/IO.pm line 440.