32c32
< our $VERSION = '0.07';
---
> our $VERSION = '0.08';
276,277c276
< 	unless(scalar(@_) == 2)
< 	{
---
> 	unless(scalar(@_) == 2) {
282,284c281
< 	my ($self, $Object) = @_;
< 	
< 	my $Data = list_counters($self->{'MACHINENAME'}, $Object, $self->{'ERRORMSG'});
---
> 	my ($self, $object) = @_;
286c283
< 	my @Counters = split(/\|/, $Data);
---
> 	my @counters = list_counters($self->{'MACHINENAME'}, $object, $self->{'ERRORMSG'});
288,289c285
< 	if($Counters[0] eq -1)
< 	{
---
> 	if( $counters[0] eq -1 ) {
292,294c288,289
< 	else
< 	{	
< 		return(\@Counters);
---
> 	else {	
> 		return(\@counters);
303,304c298
< 	unless(scalar(@_) == 2)
< 	{
---
> 	unless(scalar(@_) == 2) {
311c305
< 	my $Data = list_instances($self->{'MACHINENAME'}, $Object, $self->{'ERRORMSG'});
---
> 	my @Instances = list_instances($self->{'MACHINENAME'}, $Object, $self->{'ERRORMSG'});
313,317c307,308
< 	my @Instances = split(/\|/, $Data);
< 	
< 	if($Instances[0] eq -1)
< 	{
< 		return(-1);
---
> 	if ( $Instances[0] eq -1 ) {
> 		return( -1 );
319,321c310,311
< 	else
< 	{	
< 		return(\@Instances);
---
> 	else {
> 		return( \@Instances );