練習問題の回答をメモ。 ex14-1 #!/usr/bin/perl use strict; chdir "/" or die "Cannot chdir to /: $!"; exec "ls -l" or die "couldn't exec ls: $!"; ex14-2 #!/usr/bin/perl use strict; my $out_file = "ls.out"; my $err_file = "ls.err"; # ディレク…

練習問題の回答をメモ。 ex13-1 #!/usr/bin/perl use strict; unlink @ARGV; ## 何か問題があった時に、それをユーザに知らせる # foreach (@ARGV) { # unlink $_ or warn "Can't unlink '$_': $!, continuing...\n"; # } ex13-2 #!/usr/bin/perl use strict…