use CGI qw/:standard/;
my %formdata = map { $_ => [ param( $_ ) ] } param;

##</code><code>##

# The following is clearer for me:

my $first_name = $in_name;
foreach ( @in_colors ) {
    # do something
}

# This is less clear:

my $first_name = $formdata{ 'in_name' }[0];
foreach ( @$formdata{ 'in_colors' } ) {
    # do something
}