Signatures (III)

sub swap($a is rw, $b is rw) {
    ($a, $b) = ($b, $a);
}
my $x = 1; 
my $y = 3;
swap($x, $y);
say $x;         # 3

« first < prev (13 / 41) next > last »