my $substring = tied($object)->mySubstring($start, $length);