my @sorted = 
    sort { $a->[4] <=> $b->[4] }
    map [ split /:/ ],
    <>;