(defun fix-storynames ()
  (interactive)
  (exchange-point-and-mark)
  (save-excursion (while (search-forward "'s" (region-end) t)
     (replace-match " ")))
  (save-excursion
    (while (search-forward " story" (region-end) t)
      (replace-match "")))
  (save-excursion
    (while (re-search-forward "-\\([1-9]\\)-" (region-end) t)
      (replace-match "-0\\1-")
      (backward-char))))

Since IG now sends me an error 429 whenever I try downloading stories with gallery-dl, I use a browser addon instead. I wrote this little function to rename filenames to a format similar to my gallery-dl template. I call it in the minibuffer after selecting a region in Wdired.

I use yt-dlp to download video stories since it can get the full resolution, while the browser addon gets only the 1280p version.