our @menu_info; my $foo; $menu_info[1] = "hello"; $foo = "info"; print ${"menu_$foo"}[1];