my $js_code = 'alert("bin da");';

my $cgi = CGI->new;

print $cgi->start_html(
  -title => 'test',
  -style => '/css/sample.css',
  -script => [
    {
      -type => 'text/javascript',
      -src  => '/js/sorter.js', 
    },
    {
      -type => 'text/javascript',
      -code => $js_code,
    },
  ],
);