#!/usr/bin/env perl use strict; use warnings; use Test::More; use DDG::Test::Goodie; zci answer_type => 'golden_ratio'; zci is_cached => 1; ddg_goodie_test( [qw( DDG::Goodie::GoldenRatio )], 'golden ratio 1:?' => test_zci('Golden ratio: 1 : 1.61803398874989'), "golden ratio 2.5:?" => test_zci("Golden ratio: 2.5 : 4.04508497187474"), "golden ratio 450:?" => test_zci("Golden ratio: 450 : 728.115294937453"), "golden ratio 900:?" => test_zci("Golden ratio: 900 : 1456.23058987491"), "golden ratio 1024.56:?" => test_zci("Golden ratio: 1024.56 : 1657.77290351359"), "golden ratio ?:900" => test_zci("Golden ratio: 556.230589874905 : 900"), "golden ratio ?:768.5" => test_zci("Golden ratio: 474.959120354294 : 768.5"), "golden ratio ?:1680.12345678" => test_zci("Golden ratio: 1038.37340158601 : 1680.12345678"), "golden ratio 1 : ?" => test_zci("Golden ratio: 1 : 1.61803398874989"), "golden ratio 1 :?" => test_zci("Golden ratio: 1 : 1.61803398874989"), "golden ratio 1: ?" => test_zci("Golden ratio: 1 : 1.61803398874989"), "golden ratio ? : 9" => test_zci("Golden ratio: 5.56230589874905 : 9"), "golden ratio ? :9" => test_zci("Golden ratio: 5.56230589874905 : 9"), "golden ratio ?: 9" => test_zci("Golden ratio: 5.56230589874905 : 9"), ); done_testing;