use File::Spec;
print "\nFile::Spec->rel2abs(F:testpl.cmd) = ", File::Spec->rel2abs('F:testpl.cmd');