my $string = sprintf(
  q{start %s end},
  $obj->middle(type => q{text}),
);