Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
} \@tree, sort{ $a <=> $b } keys %byFreq;

pp \@tree;

Select or download this
```
__END__
C:\test>1031775.pl
...
  ],
]
```