1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
# Copyright (C) 2007-2012, Parrot Foundation.
=pod
=head1 DESCRIPTION
A tutorial lesson about Parrot's string operations (continued).
=head1 STRING OPERATIONS
We can pick apart a string and pull substrings out of it using the
C<substr> command. C<substr> takes a string, a starting position and
optionally an ending position. It returns all the characters in
the string between the starting and ending positions. If the ending
position is left out, C<substr> returns all the characters until the
end of the string.
C<substr> no longer provides an in-place replace, however there is a
C<replace> operator that allows this type of operation to be performed,
although not in-place. The C<replace> operator assigns a new_srting,
taking as arguments, the old_string, a start and end position, and a
string to be inserted in between the start and end positions.
=cut
.sub main :main
$S0 = substr "abcde", 1, 2
say $S0 # "bc"
set $S1, "abcde"
$S0 = substr $S1, 1, 2
say $S0 # "bc"
say $S1 # "abcde"
set $S1, "abcde"
$S0 = replace $S1, 1, 2, "XYZ"
say $S0 # "aXYZde"
say $S1 # "abcde"
.end
# Local Variables:
# mode: pir
# fill-column: 100
# End:
# vim: expandtab shiftwidth=4 ft=pir:
|
