#!/usr/local/bin/perl

system("wget -rN -R jpg,jpeg,gif,txt -np -l0 http://europa.eu.int/eur-lex/fr/lif/");