¿La forma más sencilla de hacer coincidir la matriz 2D de teclas / cadenas para buscar en perl?

Relacionado con mi pregunta anterior (encontrado aquí), Quiero poder implementar las respuestas dadas con una matriz bidimensional, en lugar de una unidimensional.

Reference Array
row[1][0]: 13, row[1][1]: Sony
row[0][0]: 19, row[0][1]: Canon
row[2][0]: 25, row[2][1]: HP

Search String: Sony's Cyber-shot DSC-S600
End Result: 13

Respuestas a la pregunta(1)

Su respuesta a la pregunta