$ perl -MPOSIX -wle 'print POSIX::FLT128_MAX;'
Name "POSIX::FLT128_MAX" used only once: possible typo at -e line 1.
print() on unopened filehandle FLT128_MAX at -e line 1.