##

use CGI qw(:standard);
...
print start_html({
   "-title"=>"A JS Demo",
   "-script" => {
       "-src" =>"/scripts/functions.js"
     }
   }
)