Select Code to Download

use Regexp::Assemble;
my $patterns = "/path/to/file.txt";
...
    }
close(FILE);
}

my $patterns = "/path/to/file.txt";
my $arg1 = shift;
...
        }
    close(FILE);

part1.*part2

fggffgfg
part1
...

part2
ytyty