I am a largely a solo coder. Meaning I don't have a lot of code infrastructure at $work. While I acknowledge the long term value of all the test infrastructure that is best practice I sometimes don't have the time to implement it while getting stuff done. My solution is to leave the debug statements from development in my production code so that if I break some old code with a new piece of code I can trace it through the old stuff as well as the new stuff. The obvious issue with this is that the debug stuff costs some production overhead.

I initially messed around with Smart::Comments since the production impact of these statements are near 0. However, I lost all of the goodness associated with logging namespaces and control from it. What is the best way to minimize the impact of deselected logging statements and deselected logging parameter evaluation in the following scenario?

package Logger;
use Moose;

sub log{
    my ( $self, $string ) = @_;
    print $string . "<--- Logged information\n";
}

package main;

my $Logger = Logger->new;

print "Some normal action here\n";

my    $debug = "Sometimes I want this";

$Logger->log( $debug );
[download]

Points for a Moose based answer!