Select Code to Download

    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);