
перестановка значений скаляров
Часто требуется поменять значение двух переменных. В perl 5 можно было сделать так: ($a,$b)=($b,$a). А как с этим в perl 6?
| | #!/usr/bin/perl6
my $a='perl6.su'; my $b='rakudo.org';
($a,$b)=($b,$a);
say "$a et $b"; | | rakudo.org et perl6.su |
Bene. А если массивы?| | #!/usr/bin/perl6
my @a=<unus duo tres>; my @b=<один два три>;
(@a,@b)=(@b,@a);
say "{@a} et {@b}"; | | один два три unus duo tres et |
М-м-м. Просто шикарно! А хэши поменять местами?| | #!/usr/bin/perl6
my %a=<unus 1 duo 2 tres 3>; my %b=<один 1 два 2 три 3>;
(%a,%b)=(%b,%a);
say "{%a} et {%b}"; | | один 1 два 2 три 3 unus 1 duo 2 tres 3 et |
Мило. Но не то. TODO. Разобраться как переставлять хэши. # mutatio postrema: 13 Aug 2010
|