Help for this page

Select Code to Download


  1. or download this
    sub process_directory {
    my ($self, $dir) = @_;
...

    closedir $dh;
}
  2. or download this
    TESTING: dir is [/tmp/testdirectory]
readdir() attempted on invalid dirhandle $dh at /path/to/MyModel.pm li
+ne 14.
FILES: 
closedir() attempted on invalid dirhandle $dh at /path/to/MyModel.pm l
+ine 18.