sub return_output
{
my ($self,%args) = @_;
return $self->{output};
}