http://qs321.pair.com?node_id=67929

ftforger has asked for the wisdom of the Perl Monks concerning the following question:

I have a script something like this (I know this doesn't work, this is just a rough sample)

$v1="user_value1"; open(INFILE,"<template.file"); $input=<INFILE>; eval $input; $line = "$input"; close(INFILE); print "$line\n";

with the contents of "template.file" being

thing1 type1 $v1

What I want is when the script runs, the print would produce:

thing1 type1 user_value1