package Stringify;

sub objectToString {
  my $name = shift;
  return sub {
    $name . (shift)->getParametersAndValues();
  };
}

# Time passes
package Fu;
*toString = Stringify::objectToString("Fu");