$ perl -MList::MoreUtils=minmax -wMstrict -e '
 my ($n,$x) = minmax(sprintf("%.4g",0.5)); die unless defined $x'
Died at -e line 2.