#!/usr/bin/per
use strict;
use warnings;
my $currDir = `pwd`;
chomp $currDir;
print "$currDir";

##</code><code>##

/root
root@kali:

##</code><code>##

#!/usr/bin/per
use strict;
use warnings;
my $currDir = `pwd`;
chomp $currDir;
print "$currDir\n";