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


in reply to Substituting Variables while reading text file

s///
use warnings; use strict; my $VAR = 'TEMP_VAR'; while (<DATA>) { s/\$VAR\b/$VAR/g; print; } __DATA__ create variable $VAR alarm_object 0