Help for this page

Select Code to Download


  1. or download this
    my $col_string = '';
for my $var ( sort {$$href{$a} <=> $$href{$b}} keys %$href ) {
    $col_string .= "$var,";
}
chop $col_string;  # remove final comma
  2. or download this
    my $col_string = join( ',',
    sort {$href->{$a} <=> $href->{$b}} keys %$href
);