| 75 | 75 |
webtv browsex silk
|
| 76 | 76 |
applecoremedia galeon seamonkey
|
| 77 | 77 |
epiphany ucbrowser dalvik
|
| 78 | |
edge
|
|
78 |
edge brave
|
| 79 | 79 |
);
|
| 80 | 80 |
|
| 81 | 81 |
our @IE_TESTS = qw(
|
|
| 197 | 197 |
aol => 'AOL Browser',
|
| 198 | 198 |
applecoremedia => 'AppleCoreMedia',
|
| 199 | 199 |
blackberry => 'BlackBerry',
|
|
200 |
brave => 'Brave',
|
| 200 | 201 |
browsex => 'BrowseX',
|
| 201 | 202 |
chrome => 'Chrome',
|
| 202 | 203 |
curl => 'curl',
|
|
| 579 | 580 |
# $browser_string = 'Maxthon';
|
| 580 | 581 |
#}
|
| 581 | 582 |
}
|
|
583 |
elsif ( index( $ua, "brave" ) != -1 ) {
|
|
584 |
|
|
585 |
# Has to go above Chrome, it includes "like Chrome/"
|
|
586 |
|
|
587 |
$browser = 'brave';
|
|
588 |
$browser_tests->{$browser} = 1;
|
|
589 |
}
|
| 582 | 590 |
elsif ( index( $ua, "silk" ) != -1 ) {
|
| 583 | 591 |
|
| 584 | 592 |
# Has to go above Chrome, it includes "like Chrome/"
|
|
| 1509 | 1517 |
$minor = $2;
|
| 1510 | 1518 |
$beta = $3;
|
| 1511 | 1519 |
}
|
|
1520 |
elsif ( $browser eq 'brave' ) {
|
|
1521 |
|
|
1522 |
# Note: since 0.7.10, Brave has changed the branding
|
|
1523 |
# of GitHub's "Electron" (http://electron.atom.io/) to "Brave".
|
|
1524 |
# This means the browser string has both "brave/" (the browser)
|
|
1525 |
# and "Brave/" (re-branded Electron) in it.
|
|
1526 |
# The generic section below looks at $self->{browser_string}, which is "Brave"
|
|
1527 |
# (Electron) and not $self->{browser} which is "brave".
|
|
1528 |
# Caveat parser.
|
|
1529 |
if ( $ua =~ m{brave/(\d+)\.(\d+)([\d.]*)} ) {
|
|
1530 |
$major = $1;
|
|
1531 |
$minor = $2;
|
|
1532 |
$beta = $3;
|
|
1533 |
}
|
|
1534 |
}
|
| 1512 | 1535 |
elsif ($browser eq 'chrome'
|
| 1513 | 1536 |
&& $ua =~ m{crios/(\d+)\.(\d+)([\d.]*)} ) {
|
| 1514 | 1537 |
$major = $1;
|
|
| 2498 | 2521 |
browsex, dalvik, elinks, links, lynx, emacs, epiphany, galeon,
|
| 2499 | 2522 |
konqueror, icab, lotusnotes, mosaic, mozilla, netfront, netscape,
|
| 2500 | 2523 |
n3ds, dsi, obigo, realplayer, seamonkey, silk, staroffice, ucbrowser,
|
| 2501 | |
webtv
|
|
2524 |
webtv, brave
|
| 2502 | 2525 |
|
| 2503 | 2526 |
If the browser could not be identified (either because unrecognized
|
| 2504 | 2527 |
or because it is a robot), returns C<undef>.
|