print "Enter a path name: "; my $path=<STDIN>; chdir($path);
chdir never "stays" in the directory...
Proof:
print "Enter a path name: "; my $path=<STDIN>; chdir($path); print `pwd`;
You want - perldoc -f opendir
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>