RSS
Home
|
Link Us
|
Contact
Categories
-- All --
Perl
PHP
MySQL
Windows
JavaScript
HTML
Apache
CVS
Linux
SEO
Perl (9)
PHP (35)
MySQL (5)
Windows (7)
JavaScript (5)
HTML (6)
Apache (6)
CVS (4)
Linux (13)
SEO (11)
The registration is temporarily disabled.
However you can post your comments without registration.
Authentication
Username:
Password:
Register
|
Lost password
-->
Detect Firefox browser with perl script/function
Home
»
Perl
»
Detect Firefox browser with perl script/function
Date: 2006-01-27
Detect Firefox browser with perl script/function
Download
|
Printer Friendly
Add to Google
Add to Del.icio.us
Add to Digg
Add to Technorati
Add to Yahoo!
Add to Blinklist
Add to Furl
Add to reddit
#!/usr/bin/perl # Example: # print "Content-type: text/html\n\n"; # print is_firefox(); # /** # * checks for user agent whether this is firefox or not # * @param void # * @return bool # * @author svetoslavm##gmail.com # * @link http://devquickref.com/ # */ sub is_firefox { my $agent = ''; $agent = $ENV{"HTTP_USER_AGENT"} || ''; if (length($agent) && $agent =~ m/firefox/si) { return 1; } return 0; }
Comments
author: Anonymous date: 2009-05-27 15:46:32
title: Re: Detect Firefox browser with perl script/function
thanks, this code is really useful...
author: Tom
site:
http://www.pagesbytom.com
date: 2010-01-12 12:47:12
title: Re: Detect Firefox browser with perl script/function
Most Excellent :)
Post a comment
Your Name
Your Email
(won't be published)
Site
(e.g. http://)
*
Title
*
Comment
*
Required fields.
Copyright © 2005-2010
Execution time: 0.01817
hosted by
1and1