Substrings

Author: Scott Penrose

You want to access or modify a portion of a string, not the whole thing.

Source code: 01-01substrings.p6

#!/usr/bin/env perl6

use v6;

my ($string, $offset, $count) = ('Rakudo is da bomb', 2, 7);
say $string.substr($offset, $count);
say $string.substr($offset);

# want to replace everything but the first two letters with the string
# "diators are nice in winter"
# this code works in Perl 5, but not in Perl 6 since strings are immutable
# substr($string, $offset) = "diators are nice in winter";
# say $string;
$string = $string.substr(0, $offset) ~ "diators are nice in winter";
say $string;