$function=Win32::API->new('CARBONDIOXIDE','DOTP','DD','D');