RE: [cgiapp] popup_menu

[Sabherwal, Balvinder (MBS)]

Thanks for the suggestions, Here is what I ended up doing to make it work

my $dbh = Sybase::CTlib->ct_connect($usr, $pwd, $srv); ## Connect to the
server.
my @dbns;
my $dbnames = $dbh->ct_sql("select name from master..sysdatabases where name
not in ('master' ,'tempdb'  ,'sybsystemprocs' ,'model' ,'sybsecurity')");

 foreach my $row (@$dbnames) {
     foreach my $col (@$row) {
         push(@dbns,$col);
     }
 }

...

$output .= $q->blockquote("Select Database : ", $q->popup_menu(-name=> 'db',
-values => \@dbns));

Is there any better way to this??

Thanks
Bal.

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