開発環境
- OS X Lion - Apple(OS)
- TextWrangler(Text Editor) (BBEditの機能制限無料版、light版)
- Script言語:Perl
『初めてのPerl 第5版』(Randal L. Schwartz, Tom Phoenix, brian d foy 共著、近藤 嘉雪 訳、オライリー・ジャパン、2009年、ISBN978-4-87311-427-9) の16章(プロセス管理), 16.8(練習問題)1を解いてみる。
1.
コード(TextWrangler)
#!/usr/bin/env perl use strict; use warnings; chdir "/" or die "can't change dirctory to / :$!"; system "ls", "-l";
入出力結果(Terminal)
$ ./sample.pl total 30453 drwxrwxr-x+ 68 root admin 2312 7 5 22:42 Applications drwxrwxr-x 15 root admin 510 11 19 2011 Developer drwxrwxr-x@ 19 root admin 646 8 6 2011 Developer-3.2.6 drwxr-xr-x+ 68 root wheel 2312 4 23 23:20 Library drwxr-xr-x@ 2 root wheel 68 8 17 2011 Network drwxr-xr-x+ 4 root wheel 136 5 10 10:22 System drwxr-xr-x 5 root admin 170 10 16 2011 Users drwxrwxrwt@ 5 root admin 170 7 6 16:03 Volumes drwxr-xr-x@ 39 root wheel 1326 5 10 10:17 bin drwxrwxr-t@ 2 root admin 68 8 17 2011 cores dr-xr-xr-x 3 root wheel 4215 7 6 16:01 dev lrwxr-xr-x@ 1 root wheel 11 10 16 2011 etc -> private/etc dr-xr-xr-x 2 root wheel 1 7 6 16:08 home drwxrwxrwt 3 root wheel 102 7 1 22:10 lost+found -rw-r--r--@ 1 root wheel 15567576 4 10 11:34 mach_kernel dr-xr-xr-x 2 root wheel 1 7 6 16:08 net drwxr-xr-x 3 root admin 102 9 5 2011 opt drwxr-xr-x@ 6 root wheel 204 10 16 2011 private drwxr-xr-x@ 62 root wheel 2108 5 10 10:17 sbin lrwxr-xr-x@ 1 root wheel 11 10 16 2011 tmp -> private/tmp drwxr-xr-x@ 15 root wheel 510 5 10 10:20 usr lrwxr-xr-x@ 1 root wheel 11 10 16 2011 var -> private/var lrwxr-xr-x 1 root admin 60 3 23 2010 ユーザーズガイドと情報 -> /Library/Documentation/User Guides and Information.localized $
0 コメント:
コメントを投稿