my $substr = substr(subject => $str, first_char => 5, length => 3, replacement => "bar"); my @parts = split(subject => $str, pattern => qr/foo/, max_parts => 7, keep_trailing_empty_fields => 1);