Here I am a day late and a dollar short and maybe I missed something, but couldn't you just do something with Win32::GetOSVersion()? It seems to return Build (as well as everything else you might need), but noone seems to have mentioned it.

Perl Doc for lack of a better source at the moment.