$ perl -MData::Dump -e " $f = inf; dd $f; $f--; dd $f; "
"inf"
1.#INF

$ perl -MData::Dump -e " dd int inf "
1.#INF

$ perl -MData::Dump -e " dd int Infinity  "
1.#INF