map { $max=$_ if $_>$max } @list;