#!/usr/bin/perl -w
use Math::BigFloat;
my $inf = Math::BigFloat->binf();   # $inf contains: "inf"
print $inf,"\n";