forked from duckduckgo/zeroclickinfo-goodies
-
Notifications
You must be signed in to change notification settings - Fork 0
/
DHL.t
31 lines (26 loc) · 1006 Bytes
/
DHL.t
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use DDG::Test::Goodie;
zci answer_type => 'dhl';
zci is_cached => 1;
ddg_goodie_test(
[qw( DDG::Goodie::DHL )],
'dhl 123456789' => test_zci(
"123456789",
heading => 'DHL Shipment Tracking',
html => qq(Track this shipment at <a href='https://www.dhl-usa.com/content/us/en/express/tracking.shtml?brand=DHL&AWB=123456789'>DHL</a>.)
),
'tracking 1234567891' => test_zci(
"1234567891",
heading => 'DHL Shipment Tracking',
html => qq(Track this shipment at <a href='https://www.dhl-usa.com/content/us/en/express/tracking.shtml?brand=DHL&AWB=1234567891'>DHL</a>.)
),
'DHL 123456789' => test_zci(
'123456789',
heading => 'DHL Shipment Tracking',
html => "Track this shipment at <a href='https://www.dhl-usa.com/content/us/en/express/tracking.shtml?brand=DHL&AWB=123456789'>DHL</a>.",
),
);
done_testing;