foreach $ss (split /,/,$INPUT{'ss'}) { 
    print qq($ss: <input type="checkbox" name="ss" value=")
          . lc($ss) . qq(" checked>&nbsp;&nbsp;\n); 
}