#!/usr/bin/perl -w
use strict;

use CGI qw(:standard);

open(FILE, '/path/to/file') or die "$!\n";
my @text = <FILE>;
chomp @text;

print header,
      start_html,
      start_form(-action=>'/cgi-bin/myscript.pl'),
      scrolling_list(-name=>'list',
                     -values=>\@text,
                     -size=>5),
      submit,
      end_html;