my $column = 1;
my %column_for = map ($_ => $column++), sort keys %error_type;
$column_for{Filename} = 0;