HTTP::UA::Parser - Perl User Agent Parser

Perl port of the ua-parser project - https://github.com/ua-parser

use HTTP::UA::Parser;
my $r = HTTP::UA::Parser->new();
print $r->ua->toString();         # -> "Safari 5.0.1"
print $r->ua->toVersionString();  # -> "5.0.1"
print $r->ua->family;             # -> "Safari"
print $r->ua->major;              # -> "5"
print $r->ua->minor;              # -> "0"
print $r->ua->patch;              # -> "1"
print $r->os->toString();         # -> "iOS 5.1"
print $r->os->toVersionString();  # -> "5.1"
print $r->os->family;             # -> "iOS"
print $r->os->major;              # -> "5"
print $r->os->minor;              # -> "1"
print $r->os->patch;              # -> undef
print $r->device->family;         # -> "iPhone"
print $r->device->brand;          # -> "Apple"
print $r->device->model;          # -> "iPhone"

Accepts a user agent string to parse, leave empty to parse caller user agent.

Accepts a new user agent to parse

Parses browser part of the user agent

Parsers operating system part of the user agent

Parses device part of the user agent

Methods to print results as strings

toString()

returns os / ua name

toVersionString()

returns full version number of os/browser

family()

returns family name of os/browser/device

major()

returns version's major part of os/browser

minor()

returns version's minor part of os/browser

patch()

returns versions patch part of os/browser

patchMinor()

returns version patch minor part of os/browser

brand()

returns brand name of device

model()

returns model name of device

From CPAN shell simply type

% perl -MCPAN -e 'install HTTP::UA::Parser'

Or from your local download, unpack and:

% perl Makefile.PL
% make && make test

Then install:

% make install

To update regexes.yaml file from command line

% ua_parser -u

To parse some user agent from command line

% ua_parser -p "some user agent"

Help usage

% ua_parser -h

Mamod A. Mehyar, <mamod.mehyar@gmail.com>

Copyright (C) 2020 by Mamod A. Mehyar & other contributors

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.