#!/usr/bin/perl 

use Inline C;           

$max=f_max();
$min=f_min();
   
print "max: $max\nmin: $min\n";

__END__ 
__C__
                    
double f_max()
{          
    return FLT_MAX;
}                     

double f_min()
{
    return FLT_MIN;
}