DROP DOWN BOXEN

[Daniel Falkenberg]

List,

I would like the following HTML/PERL sub. to go forth and grab all the users
from my database and place them into a drop down box.  Problem is I am
getting information allover the page everywhere? Could some give me some
hints on how to grab information from a database and display this
information in a drop downbox correctly?

Regards,

Daniel Falkenberg

sub add_job{
     my $sth = $dbh ->prepare( qq{ SELECT username FROM
                                db_users
                               } ) || die $dbh->errstr; ;
    $sth->execute;
    my $entries;
    print<<HTML;
    <table width="605" height="28">
    <tr>
    <td bgcolor="#C0C0C0" width="520" align="center" height="24" nowrap>
HTML
    while ($entries= $sth->fetchrow_hashref){
    print<<HTML;
    $entries->{username}
HTML
    print<<HTML;
    </td>
    </table>
HTML
    }
}

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]