Select Code to Download

foreach my $ur (@strings_to_be_matched)
{
...

}

if (($ln =~ $reg5 and $ln=~ $reg4 and ($ln !~ $reg1 or $ln =~ $reg2)))
{
...
{
<some code here...>
}