2020年5月22日金曜日

開発環境

初めてのPerl 第7版 (Randal L. Schwartz(著)brian d foy(著)Tom Phoenix(著)近藤 嘉雪(翻訳)嶋田 健志(翻訳)、オライリージャパン)の10章(さまざまな制御構造)、10.11(練習問題)3の解答を求めてみる。

コード

#!/usr/bin/env perl
use strict;
use warnings;
use v5.28;

say '3.';

$ENV{'ABCDE'} = undef;
$ENV{'z'} = undef;

for (sort keys %ENV) {
    printf "%-20s %s\n", $_, $ENV{$_} // "(undefined value)";
}

入出力結果(Zsh、PowerShell、Terminal)

% ./sample3.pl
3.
ABCDE                (undefined value)
...
LANG                 ja_JP.UTF-8
LC_CTYPE             UTF-8
LC_MESSAGES          en_US.UTF-8
...
z                    (undefined value)
%

0 コメント:

コメントを投稿