use strict;
use warnings;

my $fname = '#iDPA_SW_Template220';
my $file = $ENV{PAR_0} ? "$ENV{PAR_TEMP}/inc/$fname" : $fname;

open my $fh, $file or die "Cannot open $file";

#  do stuff with $fh