2020年4月24日金曜日

開発環境

初めてのPerl 第7版 (Randal L. Schwartz(著)brian d foy(著)Tom Phoenix(著)近藤 嘉雪(翻訳)嶋田 健志(翻訳)、オライリージャパン)の3章(リストと配列)、3.9(練習問題)3の解答を求めてみる。

コード

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

say '3.';

my @strs = sort <STDIN>;
say '全ての文字列を1行に出力';
for (@strs) {
    chomp;
    print "$_ ";
}
print "\n";

say '別々の行に出力';
print sort <STDIN>;

say '全ての文字列を1行に出力';
chomp(my @strs1 = sort <STDIN>);
say "@strs1";

say '別々の行に出力';
for (@strs1) {
    say;
}

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

% ./sample3.pl
3.
fredd
barney
wilma
betty
全ての文字列を1行に出力
barney betty fredd wilma 
別々の行に出力
fred
barney
wilma
betty
barney
betty
fred
wilma
全ての文字列を1行に出力
fred
barney
wilma
betty
barney betty fred wilma
別々の行に出力
barney
betty
fred
wilma
%

0 コメント:

コメントを投稿