Help for this page
print { $self->{_fh} } $self->{_separator}, $status, $self->{_separator}, $message, "\n";
# following the example of how you did seperator: $self->{_fh} = $args->{fh};
open my $logger_fh, ">/tmp/log.log" or die...; my $logger = LoggerClass->new({ fh => $fh });