Hi Rob,
Yea, I think that would work better, much appreciated ;)
>>"Hanson, Rob" wrote:
>
> This works for me...
>
> # sample data
> my @tags = qw(K001900 L001234 GP001675);
> my @prefixs = qw(SP 8 L K GP TP MP);
>
> # join them with pipes for use in the regex
> my $prefix = join('|', @prefix
This works for me...
# sample data
my @tags = qw(K001900 L001234 GP001675);
my @prefixs = qw(SP 8 L K GP TP MP);
# join them with pipes for use in the regex
my $prefix = join('|', @prefixs);
# match prefix against each tag, seprate the parts.
# the "o" switch cause the regex to only compile onc
