#!/usr/bin/perl
use utf8;
use strict;
use warnings;
binmode *STDOUT, ':utf8';
print "åäöfoo\n";