Select Code to Download

my $re1 = qr/beer=(\d{2}).*chips=(\d{3})/;
my $re2 = qr/vodka=(\d{2})/;
...
    #use that capture and go on...
  }
}

"cat:dog" =~ /(cat)*/;

"dog:cat" =~ /(cat)*/;