perl CGI單選按鈕形式

Question

我的代碼中有以下CGI代碼片段。它的創建textarea鍵入我想要發送的消息，但我想將其轉換爲「radio」模板樣式，因此我選擇了單選按鈕，它會將任何消息注入到客戶通知中，因此我不需要每次輸入消息。就像模板一樣。任何人有任何可以解決我的需求的例子或代碼？

use CGI; 
use CGI::Carp; 
... 
... 
$html .= $q->b("Customer Notification:") . $q->br; 
    $html .= $q->textarea(-name=>'notification', 
          -rows=>4, 
          -columns=>60) . $q->p; 

    $html .= $q->submit(-name=>' Send Notification '); 
    $html .= "        "; 
    $html .= $q->reset(-name=>' Reset to Original Value '); 
    $html .= $q->p; 

Answer 1

和其他人一樣，您應該考慮使用CGI::Alternatives中的其他解決方案之一。

不過......

my %labels = (
    'comment' => 'General Comment', 
    'problem' => 'Non-critical Problem', 
    'emergency' => 'Critical Emergency', 
); 
$html .= $q->radio_group(
      -name=>'notification', 
      -values=>['comment','problem','emergency'], 
      -default=>'comment', 
      -linebreak=>'true', 
      -labels=>\%labels, 
);