my ( $third_last, $second_last, $last ) = @record[ -3, -2, -1 ];