Thread [HTTP::DetectUserAgent] und IE 11 (23 answers)
Opened by bianca at 2013-11-22 10:46

bianca
 2013-11-22 10:46
#172150 #172150
User since
2009-09-13
7016 articles
BenutzerIn

user image
Sehe ich das richtig, dass HTTP::DetectUserAgent 0.04 den IE 11 noch nicht erkennt?
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use HTTP::DetectUserAgent 0.04;
use 5.010;

my %ua = (
    Opera_1216  => 'Opera/9.80 (Windows NT 6.1; WOW64) Presto/2.12.388 Version/12.16',
    Firefox_24  => 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:24.0) Gecko/20100101 Firefox/24.0',
    IE_10       => 'Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; Win64; x64; Trident/6.0)',
    Opera_18    => 'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/31.0.1650.8 Safari/537.36 OPR/18.0.1284.5 (Edition Developer)',
    IE_11       => 'Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko',
    Firefox_25  => 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:25.0) Gecko/20100101 Firefox/25.0',
);

for my $k (sort {lc $a cmp lc $b} keys %ua) {                                    
    my $ua = HTTP::DetectUserAgent->new($ua{$k}) or die;  
    say "$k: ",$ua->type, " ",$ua->name;
}

Code: (dl )
1
2
3
4
5
6
Firefox_24: Browser Firefox
Firefox_25: Browser Firefox
IE_10: Browser Internet Explorer
IE_11: Unknown Unknown
Opera_1216: Browser Opera
Opera_18: Browser Chrome

Falls ja, wie kann man dies in einer neuen Version erreichen?
10 print "Hallo"
20 goto 10

View full thread [HTTP::DetectUserAgent] und IE 11