Perl 6 variable as a key of a named argument

variable_as_a_key_of_a_named_argument.pl

use v6;
use Test;
use My-Module;

my @opt = <opt1 opt2 opt3>;
for @opt -> $key {
    lives-ok { my $n = My-Module.new( $key => 1 ) }, "option name $key ok";
}

done-testing();