Select Code to Download

my $page_title = "unknown" # (default value)
if (/<title>(.*?)<\/title>/) {
...
            # to be whatever was found in     
            # between the <title> and </title>             # tags
}