print {$self->{_handle}} "$location, $message. \n";