Fix Perl warning about $path masking earlier definition

Created by  Eelco Dolstra  on June 2, 2013
FTPUZNIRP77PX7MKLMUWJJT7IT4DBFFY5Z3AIG4C25SPFL5ROKAAC
Change contents