in reply to Re^2: Golf: Buying with exact changein thread Golf: Buying with exact change
sub largest { # 345678 1 2345678 2 2345678 3 2345678 4 2345678 5 23456789 @r=map'('.5x$_.')*',@_;for($=**=2;(5x$=)=~/^@r$/x;$=--){}$= }