use Perl6::Rules;
    @cmds = ('get','put','save','load','dump','quit');
    $str =~ m/ @::cmds /;

##</code><code>##

    $str =~ /get|put|save|load|dump|quit/;