use IO::All;
use IO::All::LWP;
print io("ftp://ftp.freebsd.org/pub/FreeBSD/ports/amd64/packages-8-stable/INDEX.bz2.md5")->all;