Amazonka "S3 Event Message" Type Parsing

I have a SQS message. I want to get the message body, and parse it into a S3 Event Message.

I can use a lens to get the message body:

r ^. rmrsMessages & each (^. mBody)

But I am unsure how to transform this into an S3 Event message type…

//Actually, after some searching, it looks like there is no quick way to do this from the Amazonka lib, I will have to role my own type…