generate brackets using Perl 6 idiom