cosmetic: shorten the class name when performing toString()

modules/Bio/EnsEMBL/Hive/Analysis.pm

@@ -229,7 +229,7 @@ sub dataflow_rules_collection {
 sub toString {
     my $self = shift @_;
 
-    return (ref($self).': '.join(', ', map { $_.'="'.$self->$_().'"' } qw(dbID logic_name module parameters) ));
+    return ('Analysis: '.join(', ', map { $_.'="'.$self->$_().'"' } qw(dbID logic_name module parameters) ));
 }
 
 1;

modules/Bio/EnsEMBL/Hive/ResourceClass.pm

@@ -55,7 +55,7 @@ sub name {
 sub toString {
     my $self = shift @_;
 
-    return (ref($self).': '.join(', ', map { $_.'="'.$self->$_().'"' } qw(dbID name) ));
+    return ('ResourceClass: '.join(', ', map { $_.'="'.$self->$_().'"' } qw(dbID name) ));
 }
 
 1;

modules/Bio/EnsEMBL/Hive/ResourceDescription.pm

@@ -84,7 +84,7 @@ sub worker_cmd_args {
 sub toString {
     my $self = shift @_;
 
-    return (ref($self).': '.join(', ', map { $_.'="'.$self->$_().'"' } qw(resource_class_id meadow_type submission_cmd_args worker_cmd_args) ));
+    return ('ResourceDescription: '.join(', ', map { $_.'="'.$self->$_().'"' } qw(resource_class_id meadow_type submission_cmd_args worker_cmd_args) ));
 }
 
 1;