You need to do that in a group so you can go as the whole shebang line.

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