Select Code to Download

    defined $param{selected} 
        ? ( $param{selected} .= ":$file" )
...
            -default => $param{$_},
        )
      } keys %param )

perl -le 'use CGI qw/ :standard /; print hidden( -name => "foo", -defa
+ult => "foo:bar" )'