First of all: what's the question? I don't see what the problem is.

One thing that sticks out as being incorrect is the line

Filename   =>'$rptname'
[download]

In the $msg->attach function. The single quotes around $rptname will cause it to be interpreted literally, looking for an attachment called $rptname, instead of whatever the value of the variable is. You probably just want

Filename   => $rptname
[download]