my $Current_Dir = `pwd`; print STDOUT "the current directory is $Current_Dir";