for(my $i=0;$i<$#key;$i++)
{
    my $val; #No need to put anything in it
    $output_file=$key[$i].$output_file;
    open($val,'>:utf8',"$output_file");