in reply to sorting inside specific
You probably just need to split your data into blocks. Once you do that, sort the values in each block.
use strict; use Data::Dumper; undef $/; # read all data my @sets = split('<sep>\s', <DATA>); # split by block foreach (@sets) { my @values = split /\s/; # get each value in block my @sorted = sort { $a<=>$b } @values; print Dumper(\@sorted); }
|
---|
In Section
Seekers of Perl Wisdom