$ perl -le 'print for glob "{foo,bar}{baz,quux}"'
foobaz
fooquux
barbaz
barquux