how do i sort in a descending order using perl Sort::External Module

[webdev]

Hi , use Sort::External; $output = '1.txt'; open(FILE, $output); my $sortex = Sort::External->new( mem_threshold => 1024**2 * 1024 ); while () { $sortex->feed($_); # tried to change it to ~$_ but did not work !!!!! }