Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
closedir(D)
  or die "closedir error: $!\n";
exit(0);
  2. or download this
    #!/usr/bin/perl -w

...
closedir(D)
  or warn "closedir error: $!\n";
exit(0);