Quick actions

cmd+k|ctrl+k

Navigation

Languages

param testing

Snippet info

Language

Raku

Visibility

public

Author

theangryepicbanana

Created

2018-08-16T17:12:23Z

Updated

2018-09-06T14:58:53Z

my @args = [
    :(Int $a, Int $b),
    :(Str $a, Str $b)
];

sub test {
    my $args = \(|@_).list;
    #say @_;
    given \(|@_).list {
        when @args[0] {
            say [+] $args
        }
        
        when @args[1] {
            say [~] $args
        }
    }
}


test 1, 2;

test "a", "b";

Range.^add_method: "shuffle", method {self.list.pick: *};
List.^add_method: "shuffle", method {self.pick: *};
Array.^add_method: "shuffle", method {self.list.pick: *};
Set.^add_method: "shuffle", method {self.list.pick: *};

say (1..36).shuffle, [1, 2, 3, 4, 5].shuffle, (1, 2, 3, 4, 5).shuffle, <a b c d e>.shuffle
INFO