WURFL and Perl

[wurfllover]

Hello, is there a standard WURFL API for Perl?

thanks

[sm_support2]

Hi, we support Perl in our WURFL Cloud solution. You can find examples of usage of the WURFL Perl API here:

http://www.scientiamobile.com/wurflClou ... ngStarted/

Accessing WURFL from Perl is as easy as:

Code: Select all

use Net::WURFL::ScientiaMobile;
 
# Create the client
my $scientiamobile = Net::WURFL::ScientiaMobile->new(
    api_key => 'xxxxxx:xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx',
);
 
get '/' => sub {
    # Detect your device
    $scientiamobile->detectDevice(request->env);
 
    # Use the capabilities
    if ($scientiamobile->getDeviceCapability('ux_full_desktop')) {
        return "This is a desktop web browser";
    } else {
        return "This is a mobile device";
    }
};

Please let us know if you have more questions

Thank you