sub palindromes($s) { ($s ~~ m:g/(.+).?<{$0.flip}>/)>>.Str || -1 } say palindromes "aabaab"; say palindromes "abbaba"; say palindromes "abcba"; say palindromes "abc";