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
48
49
|
# Copyright (C) 2007-2012, Parrot Foundation.
=pod
=head1 DESCRIPTION
A tutorial lesson about Parrot's register variables.
=head1 SIMPLE VARIABLES
PIR has two kinds of variables. The most simple kind are
Parrot register variables. Register variables are named with
a dollar sign followed by a single letter and an integer.
The letter corresponds to the type of the variable, I for
integer, N for number (float), S for string, and P for PMC
(any kind of object).
The C<=> symbol can be used to assign a value to one of
these register variables.
=cut
.sub main :main
$I0 = 42 # set temp integer var to the integer value 42
$N3 = 3.14159 # set temp float var to an approximation of pi
$S5 = "Hello" # set temp string var to "Hello"
$P0 = new ['String']
$P0 = "Ford" # set temp PMC var to "Ford"
say $I0
say $N3
say $S5
say $P0
.end
# Local Variables:
# mode: pir
# fill-column: 100
# End:
# vim: expandtab shiftwidth=4 ft=pir:
|
