変数$rにフォームから送られてきたラジオボタンの値が入っているものとすれば、

if ($r eq 'A') {
# Cにジャンプさせる処理をこのブロックに記述
} elsif ($r eq 'B') {
# Dにジャンプ（以下略
}

このようにやればいいのでは？