i am using the following logic
@STATION_TYPE[$i] = map { $_=~m/\w+\s+(\w+)\s+\w+/ } grep /@Last_Element[$i]/, @CALL_NAME;
So finally i am expecting output as @STATION_TYPE[$i] = AA that is last occurance of 25.
As of now i am getting output as AB that is first occurance in an array.
So could you give the solution how to find last occurance as a simple modification in the above code..