#!/usr/bin/perl use strict; use warnings; use utf8; binmode(STDOUT,':utf8'); print "Blahhhh, blah', blaaaÄÖÜäöüß!\n";