Please read the writeup formatting tips and actually look at the preview before posting a question. It's really hard to read like this, and now someone has to correct your post.
Also:
I'm pretty sure that isn't the whole code
you should not use single quotes around $variables because then they won't interpolate
you're creating 2 Mail::Mailer objects, you should only need one.