print header( -charset=>'utf-8' );
print start_html( -script => my $js,
                -style=>'/data/css/style.css',
                  -title=>'Order Project!' );

##</code><code>##

my $js = <<EOH;
// JavaScript here
EOH
print header( -charset=>'utf-8' );
print start_html( -script => $js,
                -style=>'/data/css/style.css',
                  -title=>'Order Project!' );

##</code><code>##

td(
  popup_menu(
    -name => 'ordered_items',
    -multiple => 1,
    -id => 'ordered_items',
    -style => "width: 230px;"
  )
),