while(<DATA>)
{
    my (@elements) = split(/\s/, $_);
    my $html = "<td><input type=\"$elements[1]\" name=\"$elements[0]\"></td>";
    print "<table><tr><td>$html</td></tr></table>\n";
}

__DATA__
Subject checkbox yes
Data checkbox yes