Mahmoud A. Mehyar

NAME

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

DESCRIPTION

Perl port of the ua-parser project - https://github.com/tobie/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"
    

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

Strigify 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

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

AUTHOR

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

COPYRIGHT AND LICENSE

Copyright (C) 2013 by Mamod A. Mehyar

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.