isabella232 / uap-perl

Perl implementation of ua-parser

NAME

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

DESCRIPTION

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

SYNOPSIS

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"

Methods

new()

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

parse()

Accepts a new user agent to parse

ua()

Parses browser part of the user agent

os()

Parsers operating system part of the user agent

device()

Parses device part of the user agent

Stringify Methods

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

INSTALLATION

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

COMMAND LINE

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

AUTHOR

Mamod A. Mehyar, <[email protected]>

COPYRIGHT AND LICENSE

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.