use strict; use warnings; my $var_name_modifier1 = '100'; my $var_name_modifier2 = '200'; our $specific_200_var = "this is from 200\n\n"; our $specific_100_var = "this is from 100\n\n"; print "\n\n\n\n"; print 'this is what we have for 100: '; NO_STRICT_BLOCK: { no strict "refs"; print ${"specific_${var_name_modifier1}_var"}; } print " \n\n";