Help for this page

Select Code to Download

Select or download this

my $allDocs = do
   {
...
  
      if ($award{'entireaward'} =~ m{Dollars Obligated(.*?)\$([^<]+?)<
+}gi){
        $award{'B_dollob'} = $2};