$v1="user_value1"; open(INFILE,"; eval $input; $line = "$input"; close(INFILE); print "$line\n"; #### thing1 type1 $v1 #### thing1 type1 user_value1