2020年4月28日火曜日

開発環境

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

コード

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

say '1.';

print reverse <>;

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

% cat tac sample{1,2}.txt
#!/usr/bin/env perl
use strict;
use warnings;
use v5.28;

say '1.';

print reverse <>;
aaaaa
b
cccc
dd
e
% ./tac tac sample1.txt sample2.txt 
1.
e
dd
cccc
b
aaaaa
print reverse <>;

say '1.';

use v5.28;
use warnings;
use strict;
#!/usr/bin/env perl
% ./tac tac sample{1,2}.txt
1.
e
dd
cccc
b
aaaaa
print reverse <>;

say '1.';

use v5.28;
use warnings;
use strict;
#!/usr/bin/env perl
% ./tac tac sample{2,1}.txt
1.
b
aaaaa
e
dd
cccc
print reverse <>;

say '1.';

use v5.28;
use warnings;
use strict;
#!/usr/bin/env perl
% cat tac sample{2,1}.txt
#!/usr/bin/env perl
use strict;
use warnings;
use v5.28;

say '1.';

print reverse <>;
cccc
dd
e
aaaaa
b
% 

0 コメント:

コメントを投稿