use Encode;
$perl_string = decode('cp1252', $windows_crap);