open(my $fhin, "<", $file_name ) or die "Konnte Input $file_name nicht oeffnen: $! !\n";