Help for this page

Select Code to Download

Select or download this
```
print "Entering sub dirname\n";
```

Select or download this

sub dirname {
    print "Entering sub dirname\n";
...
    mkdir $name, 0755 or warn "Cannot make dir $name:  $!";
    print "$name \n";
}