use File::Spec; @paths = map File::Spec->catfile($pwd, $_), @paths;