$ /opt/perl/5.9.0/bin/perl -wle 'print q(").(100**100**100).q(")'
    "inf"
    $ /opt/perl/5.8.1/bin/perl -wle 'print q(").(100**100**100).q(")'
    "inf"