use strict; my $v1="user_value1"; open(INFILE,"; close(INFILE); $input = '"' . $input . '"';; my $line = eval $input; print "$line\n";