543 |
$out->select ([ |
$out->select ([ |
544 |
{value => '', label => 'As specified'}, |
{value => '', label => 'As specified'}, |
545 |
{value => 'application/atom+xml'}, |
{value => 'application/atom+xml'}, |
546 |
|
{value => 'text/cache-manifest'}, |
547 |
|
{value => 'text/css'}, |
548 |
|
{value => 'text/x-h2h'}, |
549 |
|
{value => 'text/html'}, |
550 |
|
{value => 'text/x-webidl'}, |
551 |
{value => 'application/xhtml+xml'}, |
{value => 'application/xhtml+xml'}, |
552 |
{value => 'application/xml'}, |
{value => 'application/xml'}, |
|
{value => 'text/html'}, |
|
553 |
{value => 'text/xml'}, |
{value => 'text/xml'}, |
|
{value => 'text/css'}, |
|
|
{value => 'text/cache-manifest'}, |
|
|
{value => 'text/x-webidl'}, |
|
554 |
], name => 'i', selected => scalar $cgi->get_parameter ('i')); |
], name => 'i', selected => scalar $cgi->get_parameter ('i')); |
555 |
$out->end_tag ('label'); |
$out->end_tag ('label'); |
556 |
|
|