Select Code to Download

<select name="color" multiple>
  <option value="1">Red</option>
  <option value="2">Blue</option>
  <option value="3">Green</option>
</select>

    #!/usr/bin/perl -wT
    use strict;
    use CGI qw/:standard/

    my @colors = param( 'color' );