You've only posted HTML. If this is really a problem of Perl inserting a variable title, consider below:
in reply to How to make dynamic result in META varriable in perl template toolkit
The above will allow you to insert variable text in the title, if that is all you want.
my $pageTitle = 'variable title text';
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http:/
<meta name="generator" content="Ipad2 and iphone accesories" / +>
<meta name="author" content="cloudsandcolors.com" />
print qq[rest of properly formatted web page];
I suspect, however, you want something cooler, like dynamic update of <title> after page is already loaded. If I am wrong, my code above should help.