use Win32::API ();

Win32::API->Import('mydll', 'float Get_Temperature()');
Win32::API->Import('mydll', 'BOOL isThisHot(int)');

my $temp = Get_Temperature();
my $hot  = isThisHot($temp);