Help for this page
Select Code to Download
Select
or
download this
my @indicies = sort { $list[$a] <=> $list[$b] ) 0.. $#list;