my %folderMapFinal; #print $q->header; print "Content-type: text/plain\n\n"; print "Content-type: text/html\n\n"; foreach my $folderMap (sort keys %folderhash) { print STDERR "INSIDE FOR LOOP FOR FOLDERMAP\n"; %folderMapFinal =$folderMap; printf "%-8s %s\n\n", $folderMap, $folderhash{$folderMap}; } $q->div( { -class => "text" }, "Folder Name* : ", #my $defaultVal ='0', $q->popup_menu( -name=>'foldernameval', -id=> 'folder_name_id', -onChange => 'getReportName()', -type=>'dropdown', #-values=> \%folderhash, -values=> \%folderMapFinal, #-default=>$defaultVal, -default=>['0'], ), $q->hidden( -name => ('folder_name', -id=> 'h_folder_name_id', -value => '' )), #$q->a( { -href => "signoff.cgi?rm=view_report&fId=3", -onClick => 'setFolderNameId()', -title => "Populate Report Name" }, "Populate Report Name" ), ),$q->end_div, $q->br, $q->br, $q->div( { -class => "text" }, "Report Name* : ", $q->popup_menu( -name=>'reportnameval', -id=> 'report_name_id', -onchange => 'setReportId()', -type=>'dropdown', -values=> \%reportHash, -default=>['0'], ), $q->hidden( -name => ('report_name', -id=> 'h_report_name_id', -value => '' )), #$q->a( { -href => " ", -onClick => 'setFolderNameIdInURL()', -title => "Populate Report Name" }, " Click here to Populate Report Name" ),