#!/usr/bin/env perl use strict; use warnings; use Test::More; use DDG::Test::Goodie; zci answer_type => 'calendar_conversion'; zci is_cached => 0; my @g22h = ( '22 August 2003 (Gregorian) is 23 Jumaada Thani 1424 (Hijri)', structured_answer => { input => ['22 August 2003 (Gregorian)'], operation => 'Calendar conversion', result => '23 Jumaada Thani 1424 (Hijri)' }, ); my @h23g = ( '23 Jumaada Thani 1424 (Hijri) is 22 August 2003 (Gregorian)', structured_answer => { input => ['23 Jumaada Thani 1424 (Hijri)'], operation => 'Calendar conversion', result => '22 August 2003 (Gregorian)' }, ); my @g22j = ( '22 August 2003 (Gregorian) is 31 Mordad 1382 (Jalali)', structured_answer => { input => ['22 August 2003 (Gregorian)'], operation => 'Calendar conversion', result => '31 Mordad 1382 (Jalali)' }, ); ddg_goodie_test( [qw(DDG::Goodie::CalendarConversion)], '22/8/2003 to hijri' => test_zci(@g22h), '22/8/2003 to the hijri calendar' => test_zci(@g22h), '22,8,2003 to hijri' => test_zci(@g22h), '23/6/1424 in hijri to gregorian years' => test_zci(@h23g), '23/6/1424 hijri to gregorian' => test_zci(@h23g), '22/8/2003 to jalali' => test_zci(@g22j), '31/5/1382 jalali to gregorian' => test_zci( '31 Mordad 1382 (Jalali) is 22 August 2003 (Gregorian)', structured_answer => { input => ['31 Mordad 1382 (Jalali)'], operation => 'Calendar conversion', result => '22 August 2003 (Gregorian)' }, ), '31/5/1382 jalali to hijri' => test_zci( '31 Mordad 1382 (Jalali) is 23 Jumaada Thani 1424 (Hijri)', structured_answer => { input => ['31 Mordad 1382 (Jalali)'], operation => 'Calendar conversion', result => '23 Jumaada Thani 1424 (Hijri)' }, ), '23/6/1424 in hijri to jalali date' => test_zci( '23 Jumaada Thani 1424 (Hijri) is 31 Mordad 1382 (Jalali)', structured_answer => { input => ['23 Jumaada Thani 1424 (Hijri)'], operation => 'Calendar conversion', result => '31 Mordad 1382 (Jalali)', }, ), 'August 22nd, 2003 to jalali' => test_zci(@g22j), '22 Aug 2003 to Hijri' => test_zci(@g22h), '22/8/2003 in the hijri calendar' => test_zci(@g22h), '22nd Aug 2003 in jalali' => test_zci(@g22j), '8-22-2003 in hijri years' => test_zci(@g22h), 'August 22 2003 in jalali date' => test_zci(@g22j), '22nd Aug 2003 in gregorian time' => undef, ); done_testing;