my $result = `awk $var1 $var2`; 

##</code><code>##

        
open(my $awk, "|awk >Tmp$$") # $$ is our process id
   or die "Can't start awk: $!";
print $awk $var1, $var2;
close $awk;