3-1 カレントディレクトリのファイルリストを読み込み、名前をフルパスに変換して表示する。 #!/usr/bin/perl use strict; use warnings; use Cwd qw/ abs_path /; print map { q/ / x 4 . abs_path($_) . qq/\n/ } glob '*'; 問題文にはFile::SpecとCwdが役…

1章はイントロダクションなので2章から。 2-1 コマンドラインからファイル名のリストを受け取り、grepで1,000バイト未満のファイルを選択し、mapを使って先頭にスペース4文字、末尾に改行をつけて表示する。 #!/usr/bin/perl use strict; use warnings; # my…