\n");
+
+print("I read the following user agent string from your browser:\n ");
+print("".$ua->uastring."\n");
+
+print("
This is ".($ua->isns()?"a":"no")." Netscape browser.\n");
+print(" This is ".($ua->isns4()?"a":"no")." Netscape Communicator 4 browser.\n");
+print(" This is ".($ua->isie()?"an":"no")." Internet Explorer browser.\n");
+print(" This is ".($ua->geckobased()?"a":"no")." Gecko-based browser.\n");
+print(" This is ".($ua->khtmlbased()?"a":"no")." KHTML-based browser.\n");
+print(" The browser brand is reported as "".$ua->brand.""\n");
+print(" The browser version is reported as "".$ua->version.""\n");
+if ($ua->geckobased()) { print(" The Gecko date is reported as "".$ua->geckodate().""\n"); }
+print("
I conclude this must be ".$ua->brand." ".$ua->version."\n");
+
+print("
Test the following UA string:\n");
+print("\n");
+?>
+
+
\ No newline at end of file