"Few potential valentines are going to be impressed by the number and/or quality of your CPAN modules, and that's that."

WHAT?!?! What have I been writing all this code for, if not to get some action? Don't they understand that my modules are a sign of virility? Is that why my wife's eyes glaze over when I start talking about refactoring?

"Take the passion that you put into your code and apply it to your valentine on a regular basis."

Just don't send them Valentines that look like this

my $val = Valentine->new();
print qq(I love you!\n) if ($val->{'me'} + $val->{'you'} == 1);
[download]

An insightful post Art_XIV. ++