Help for this page
package Test_logger; ... } 1;
#!/usr/bin/perl ... $log->message("Start of program"); test_addition($log);