utf8の文字コード変換を全てperlにまかせて、プログラムに変換処理を書かない方法。

#!/usr/bin/env perl

use v5.26;
use utf8;
use warnings;
use strict;

use Encode::Locale;

use feature "say";
use open IO => ":utf8";

binmode STDOUT, ":encoding(console_out)";
binmode STDERR, ":encoding(console_out)";

my $気合 = 10;
say "喝" x $気合;

サンプルプログラムの元ネタはこちら。
utf8移行と自分メモその2 :: ひまつぶし雑記帖 t2aki.doncha.net/?id=116843976

フォロー

解説はこちら。
Perlサンプル1 文字表示 - Sample - ルモーリン lemorin.jp/sample/01_perlsampl

ログインして会話に参加
Fedibird

様々な目的に使える、日本の汎用マストドンサーバーです。安定した利用環境と、多数の独自機能を提供しています。