$fr1->Label(-textvariable=>\$lblStatus, -background=>'yellow', etc.
...
$lblStatus = "Download failed: " . $request->status_line . " Retrying $i... \n"