История изменений
Исправление AITap, (текущая версия) :
Нужно всего-то распарсить JSON https://api.vk.com/method/photos.get?owner_id=-105172068&album_id=235693221&v=5.60&photo_sizes=1, вот документация.
Например,
perl -MList::Util=max -MJSON=decode_json -MLWP::Simple=get -E'say for map { %avail = map { ($_->{width}*$_->{height}, $_->{src}) } @{$_->{sizes}}; $avail{max keys %avail} } @{(decode_json get shift)->{response}{items}}' "https://api.vk.com/method/photos.get?owner_id=-105172068&album_id=235693221&v=5.60&photo_sizes=1"По крайней мере, URL совпадают с тем, что VK выдаёт по ссылке «открыть оригинал».
Исходная версия AITap, :
Нужно всего-то распарсить JSON https://api.vk.com/method/photos.get?owner_id=-105172068&album_id=235693221&v=5.60&photo_sizes=1, вот документация.
Например,
perl -MList::Util=max -MJSON=decode_json -MLWP::Simple=get -E'say for map { %avail = map { ($_->{width}*$_->{height}, $_->{src}) } @{$_->{sizes}}; $avail{max keys %avail} } @{(decode_json get shift)->{response}{items}}' "https://api.vk.com/method/photos.get?owner_id=-105172068&album_id=235693221&v=5.60&photo_sizes=1"