perl6.suОсвоим perl6 к 2015 году!

перестановка значений массивов


       Часто требуется поменять значение двух переменных. В 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

   перестановка значений скаляров, перестановка значений массивов      charta situs       nota X   

    RSS     stdin@perl6.su    © Alexius Karmanov, 2010-2011