#!/usr/bin/env perl use strict; use warnings; use utf8; binmode STDOUT => ':utf8'; print "こがいだん\n"