Usando un nombre de variable generado dinámicamente en el modo estricto de Perl [duplicado]
Esta pregunta ya tiene una respuesta aquí:
¿Cómo puedo usar una variable como nombre de variable en Perl? 3 respuestasBásicamente, me gustaría capturar el contenido de una variable nombrada en una cadena generada dinámicamente, pero todos los esfuerzos para lograr esto en modo estricto han fallado. Hay varias publicaciones sobre problemas similares, pero ninguna parece tener soluciones que hayan funcionado para mí.
Esto es lo que quiero hacer:
# Fields:
$q1 = "ex. data 1";
$q2 = "ex. data 2";
$q3 = "ex. data 3";
$q4 = "ex. data 4";
$q5 = "ex. data 5";
# retrieve the desired field name. q1, q2, q3, q4, or q5.
$field_name = fetch_the_desired_field_name();
# fetch the contents of the named field. ex. data 1, ex. data 2, etc.
$contents_of_desired_field = $field_name;
print $contents_of_desired_field;
¿Hay una manera de hacer esto en modo estricto? En otras publicaciones sobre problemas similares, la gente dice que los hashes son la respuesta, pero parece que no puedo entender cómo hacer esto con un hash. No hace falta decir que este es un ejemplo muy simplificado. En el código real, hay 115 nombres de campos posibles, todos extraídos de una base de datos, con contenido impredecible.