Help for this page
sort_arrayref( $data, -compare=>'numeric', sub { substr (shift)->[0] +, 2 }, 3 )
sort_arrayref( $data, -compare=>'numeric', -extract=>'compound', [ index => 0, substr => 2 ], [ index => 3 ] )