how to get "Subject" using MIME::Parser ?

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Hiya Monks...,

I need to get the 'subject:' using the MIME::Parser. How can I get that...?

We will get the body by using $data->{BODY}

Can I do it like this, $data->{HEADER}; ? to get the subject, If not pls guide me through.

Thx in advance