Oh man, you might was well just go get Jeffrey Freidl's book now. At Oreilly.

--
$you = new YOU;
honk() if $you->love(perl)