#!/usr/bin/perl

use strict;
use warnings;
use utf8; # perl mitteilen das aller Text UTF-8 sein soll
use Encode; # zum anpassen der Ausgabetexte

my $name='wäre_es_nur_nicht_€';

mkdir(encode("CP850", $name));