Select Code to Download

#!/usr/bin/perl -w
...
  }
}

 push @value_2, $ele if ($ele =~ /DFT Tasks for Ration/ .. $ele =~ /EN
+D OF RATION/);

 push @value_2, $ele if ($ele =~ /DFT Tasks for Ration/ ..  /END OF RA
+TION/);