Select Code to Download

if (
   $str =~ /
...

   ...
}