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 });