package OrangeSoap::Test; =for interface [interface: pure] =cut =for interface str addthis(str thisstring); =cut sub addthis { my ($this, $thisstring); return '***' . $thisstring . '***'; }