use Win32::API ();

my $Get_Temperature = Win32::API->new(
   'mydll', 'float Get_Temperature()',
);

my $isThisHot = Win32::API->new(
   'mydll', 'BOOL isThisHot(int)',
);

my $temp = $Get_Temperature->Call();
my $hot  = $isThisHot->Call($temp);