in reply to Re^2: Help with exercise
in thread Help with exercise
of course once we get into checking the returns, we may find chdir does all the testing we need already ...
use strict; use warnings; use Cwd; my $dir = shift; chdir $dir or die "Couldn't chdir $dir: $!\n"; print "OK, in ". getcwd . "\n";
And the outut
# ./change.pl Downloads/ OK, in /home/Random/Downloads # ./perl change.pl foo Couldn't chdir foo: No such file or directory # ./mkdir bar # ./chmod 000 bar # ./perl change.pl bar Couldn't chdir bar: Permission denied
Cheers,
R.
Pereant, qui ante nos nostra dixerunt!
|
---|
In Section
Seekers of Perl Wisdom