Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Substituting Variables while reading text file

by Laurent_R (Canon)
on Aug 05, 2014 at 18:52 UTC ( [id://1096337] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
  2. or download this
    my $VAR = "TEMP_VAR";
  3. or download this
    $ 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