Help for this page

Select Code to Download

Select or download this
```
sub f{d,c,b,a,f,e}
```

Select or download this

my @list = (
     a => [ 'b', 'c', 'e' ],
...
     f => [ 'a' ],
);
print join (',', map { "'$_'" } f(@list)),"\n";