Dear Perl Monks, I would like to convert all my perl scripts so that can run on windows on C or D drive regardless. Please see what I have right now and what I would like to come up with Thanks a lot Gasho

#This is what I have set right now
#$LocationOfTheDelSrvDirectory="D:\\PROGRA~1\\RESOUR~1";
#$LocationOfTheScriptsDirectory="D:\cr1_qc\eaqc\main\AutomationInfrast
+ructure\SDK";

#This is what I would like to have

#1. Determine from what location script is called ( D:\ ... or C:\...)
#2. Perl code here for 1.(?)
#Assign variable to $Drive='C' or $Drive='D'; 

#then use

$LocationOfTheDelSrvDirectory="$Drive:\\PROGRA~1\\RESOUR~1";
$LocationOfTheScriptsDirectory="$Drive:\cr1_qc\eaqc\main\AutomationInf
+rastructure\SDK";
[download]