Applescript | Извлечение наибольшего целого числа и создание чисел от 0 до наибольшего целого числа

У меня есть сценарий, возвращающий следующие результаты:

https://XY.com/shop/General-Mad-Dog-Mattis-For-PrN

https://XY.com/search?q=mad%20dog&p=29

https://XY.com/search?q=mad%20dog&p=26

Теперь мне нужно найти наивысшее целое число (в данном случае & p = 29) и создать новые строки от https://XY.com/search?q=mad%20dog&p=0 до наивысшего найденного целого числа в этом случае https://XY.com/search?q=mad%20dog&p=29

Пока мне удалось извлечь необходимый URL-адрес с помощью следующего кода:

set AllUrls to {"https://XY.com/search?q=mad%20dog&p=26", "https://XY.com/search?q=mad%20dog&p=29", "https://XY.com/shop/General-Mad-Dog-Mattis-For-PrN"}

-- FILTER PAGING URLS
set PagingFilter to "&p = "
set PagingUrls to {}
repeat with i from 1 to length of AllUrls
    if item i of AllUrls contains PagingFilter then

        set end of PagingUrls to item i of AllUrls
    end if
end repeat
PagingUrls -- returns {"https://XY.com/search?q=mad%20dog&p=26", "https://XY.com/search?q=mad%20dog&p=29"}

И небольшой скрипт для извлечения последних двух цифр из URL-адресов:

set alphabet to "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
set myURLs to {"https://XY.com/search?q=mad%20dog&p=26", "https://XY.com/search?q=mad%20dog&p=29"}
set the text item delimiters of AppleScript to ¬
    {space} & characters of the alphabet & {".", "_"}
set a to text items of myURLs as text

get last word of a --> returns "21"


set numlist to {}
repeat with i from 1 to count of words in a

    set this_item to word i of a
    try
        set this_item to this_item as number
        set the end of numlist to this_item

    end try

end repeat
numlist -- returns {26, 29}