use Shell;

$dir = dir();

print $dir;