NAME Mobile::Devices - search for and get mobile device information SYNOPSIS use Mobile::Devices; my $devices = Mobile::Devices->new('search_base' => File::Spec->catfile($Bin, 'wurfl-data')); my $device = $devices->search( 'id' => 'nokia_6131nfc_ver1' ); my $device2 = $devices->search( 'user_agent' => 'Nokia6131NFC' ); DESCRIPTION Search for and get mobile device information. Data are from WURFL. PROPERTIES search_base Sets the folder where generated files ( Mobile/Device/IDs.pm, Mobile/Device/IDs/*, Mobile/Device/UAs.pm, Mobile/Device/UAs/*, Mobile/Device/wurfl.xml, Mobile/Device/wurfl.zip, ) will be looked for. By default its `dirname($INC{'Mobile/Devices.pm'})' - location of this module. METHODS new() Object constructor. search($by => $ident) Lookup the module device. Either by c or by `id'. search_by_id($id) Lookup device by it's WURFL id string `$id'. search_by_ua($ua) Lookup device by it's user-agent string `$ua'. id_by_ua($ua) Returns WURFL id associated with `$ua'. ua_to_filename($ua) Returns filename where the `$ua' to id mapping should be stored. id_to_filename($id) Returns filename where the WURFL information for device with `$id' is stored. id_to_modulename($id) Returns Perl module name where the wurfl information for device with `$id' is stored. SEE ALSO Mobile::Devices::Loop, http://wurfl.sf.net/, Mobile::Wurfl, Mobile::WURFL AUTHOR Jozef Kutej COPYRIGHT AND LICENSE Copyright (C) 2009 by Jozef Kutej This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.