for my $match ( @tied_result ) {
    # ...
}