convert given-when to if-else

perl 5.16.3でno warnings 'experimental';の部分でエラー吐いていたのと、given-when自体が実験的な機能ってことになったと聞いたので、if-elseに置き換えてみました。