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) }