Derrière ce nom ridicule, se cache ma dernière ponderie en Perl. PIF est un script qui permet de télécharger des images en masse. Le principe est simple, rien n'est plus reulou qu'un index apache avec pleins d'images, c'est pas pratique du tout pour regarder les photos, et pas pratique pour télécharger toutes les photos non plus. PIF s'occupe de les télécharger pour vous, magie. Pour l'instant, PIF ne télécharge que les images linkées, c'est à dire qu'il cherche tous les liens vers des images, mais ne tient pas compte des balises images. Pour les chauds que ça interresse mais qui n'iront pas voir le chercher dans le code, voilà la regexp que j'utilise:

/href=\"((.+)\.($img_exts))\"/i

Et aussi, il ne descend pas dans les répertoires existants. Ces deux options, gestion des balises images et descendage dans les répertoires seront disponibles via des options dans la prochaine version.

PIF est donc programmé en Perl et nécessité le module LWP pour fonctionner (contactez votre admin preferré pour installer LWP ;). Il prend en argument obligatoire l'URL de la page où télécharger les images et en argument optionel le répertoire local où vous désirez stocker les images (cc).

Dans le futur, si j'ai le temps et le courage (les mêmes conditions que pour burn.sh en fait), j'utiliserais GetOpt pour avoir des beaux arguments genre --base-url et --output-dir.

EDIT:

Options à implémenter:

  • --help
  • --version
  • --base-url=string
  • --output-dir=string
  • --recurse-subdirs
  • --recurse-level=int
  • --fetch-img-tags
  • --quiet
  • --tmp-file=string
  • --img-exts=string