-use Cwd;
+use Cwd qw( cwd abs_path );
 use File::Spec;
-use File::Spec::Functions qw( canonpath splitpath );