use CGI; my %hash; @hash{ @{$CGI::EXPORT_TAGS{$_}} }= () for keys %CGI::EXPORT_TAGS; my @methods= sort keys %hash; print join "\n", @methods, ""; __END__