Use of uninitialized value $out in concatenation (.) or string at blastall_modificado line 20.
readline() on closed filehandle $IN at blastall_modificado line 26.
Use of uninitialized value $out in concatenation (.) or string at blastall_modificado line 80.
 is done