Help for this page
$VAR = TEMP_VAR
my $VAR = "TEMP_VAR";
$ echo 'create variable $VAR alarm_object 0' | perl -e '$VAR = "TEMP_V +AR"; while (<>) { chomp; eval (qq{print "$_\n";});}' create variable TEMP_VAR alarm_object 0