#!/usr/bin/perl use utf8; use Encode qw( encode ); use Win32::Codepage; mkdir encode(Win32::Codepage::get_encoding(), 'Ïntêràtíonaliçzation');