my $filename = "fileLocn/$var1_$var2.txt";

##</code><code>##

# escape the underscore
my $fileName = "fileLocn/$var1\_$var2.txt";

# or wrap the identifier in curly braces
my $fileName = "fileLocn/${var1}_$var2.txt";