my perl ineptitude

Well, I've just found out why my perl code wasn't working. I was tring to use undef as a value for comparison, wheres context I'd used it, it was being used as a function which undefined any assigned value.
$connect("hand", "forehead"); # <fx:slap>
This has taken be the best part of the day to spot.

Not long to go now before the day ends.