#!/usr/bin/env perl use strict; use warnings; use utf8; MAIN: { binmode(STDOUT, ":utf8"); print "Hello, world!\n"; }