Close!
#!/usr/bin/perl use 5.018; use strict; use warnings; # 1118814 use Cwd; use File::HomeDir(); my $cwd = getcwd(); say "At Ln 12: \$cwd: $cwd"; my $HOME = File::HomeDir->my_home; chdir $HOME or die "Couldn't chdir $HOME: $!"; say "At Ln 18; \$HOME: $HOME"; $cwd = getcwd(); say "At Ln 21, \$cwd: $cwd"; =head Execution: C:\>D:\PMonks\1118814.pl At Ln 12: $cwd: C:/ At Ln 18; $HOME: C:\Users\ww At Ln 21, $cwd: C:/Users/ww =cut
In reply to Re^2: Changing path to home directory
by ww
in thread Changing path to home directory
by The_Last_Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |