Help for this page

Select Code to Download

Select or download this

$dir = "c:/windows/desktop";
chdir $dir or (warn "Cannot chdir $dir: $!" and next);
opendir(TEXTFILES, "$dir") || die "Couldn't open the text file directo
+ry