----------input--------------- 
street-cat animal
apple plant
strawberry plant
muffler goods
-----------------------

##</code><code>##

---------simplified code--------------
@filehandle_array=@data_type_array;
$data_type_number=@data_type_array;
for($i=0;$i<$data_type_number;$i++)
{
 open $filehandle_array&#91;$i], '>', $filename_array[$i];
}
----------------------