sub logfilename {
	my $self = shift;
		
	my $logfilename;
	
	if ($self->[1]) {
		$logfilename = $self->[1]; }
	else {
		$logfilename = "DEFAULT_logfile_name";	}
				
	return $logfilename;
}