Help for this page

Select Code to Download


  1. or download this
    #!/opt/local/bin/perl
use strict;
use diagnostics;
...
my $d = "/Users/dbae/tmp";
find(\&p,$d);
sub p { };
  2. or download this
    H2:~% pwd
/Users/dbae
H2:~% ls -ld .
...
H2:~% ls -ld tmp
drwxr-xr-x  68 dbae  dbae  2312  3 May 14:14 tmp/
H2:~% ~/bin/t # name of file containing perl code
  3. or download this
    Can't cd to (/Users/dbae/tmp/) tmpvdlE9a: Permission denied
 at /Users/dbae/bin/t line 7
Can't cd to (/Users/dbae/tmp/) tmpZgzgiz: Permission denied
 at /Users/dbae/bin/t line 7