use strict;
use CGI qw(param);
use Data::Dumper;

my @list = param('list');
print Dumper \@list;

##</code><code>##

$VAR1 = [
          'foo',
          'bar',
          'baz',
          'qux'
        ];