$pins2 =~ s/\*$/.*/; # make key into regex string if trailing *

##</code><code>##

    $pins2 =~ s/\*/.*/; # make key into regex string if containing *

##</code><code>##

    $pins2 =~ s/\*/.*/g; # make key into regex string if containing *