Select Code to Download

# OO method for error to STDERR uisng 'warn'
...
        warn "$error\n";
    }
}

$object->error_to_log("I made it this far, I can't believe it");

$object->error_to_log("Date: $date Variable: $var",1);

# $debug is a global variable
...
        warn "$error\n";
    }
}

&error_to_log("Error message");