pushd %Root%
call perl Folder2\Perl1.pl

##</code><code>##

use strict;
use warnings;

use lib "Folder3\\Folder4\\";
use Param;

my $Path = $Param::My_Path;
print "$Path\n";