Select Code to Download

   use Encode qw(encode decode);
   my $regexp_source = "... regexp string ...";
...
   if ($normalized =~ /$regexp/) {
      store_data($response);
   }