perl get absolute fie or directory path from relative path

use Cwd;
print Cwd::abs_path(".");

#output: c:/my1/work