autoEscape(undef);
print radio_group (-name => "item",
                   -value => ["B","T","S","M"],
                   -labels => {
                       'B' => 'Item '.a({-href=>"/help/b.html"},"B").' ($10)',
                       'T' => 'Item .a({-href=>"/help/b.html"},"T").' ($50)',
                       'S' => 'Item .a({-href=>"/help/b.html"},"S").' ($200)',
                       'M' => 'Item .a({-href=>"/help/b.html"},"M").' ($500)'
                              },
                   -linebreak => 1);
autoEscape(1);