##
my $CUR_MODE = ## (the current mode)
my %modes => ('mode9 => 'Customer Search',
'mode11' => 'Kit Search');
my @menu;
for(keys %modes) {
push @menu, { link_url => 'http://foo.com/?' . $_,
link_text => $modes{$_}
$_ eq $CUR_MODE ? (linked => 0) : (linked => 1) }