I thought that got fixed? Changes supports my memory:

1.53    [2003-12-30]
    - Windows: higher resolution time() by using the Windows
      performance counter API, from Jan Dubois and Anton Shcherbinin.
      The exact new higher resolution depends on the hardware,
      but it should be quite a bit better than using the basic
      Windows timers.
[download]

Here's some code that will test this. I only have version 1.2, so I'm still using the lower res timer.

use Time::HiRes qw( time sleep );

my @times = map { time } 0..200;
#my @times = map { sleep(0.001); time } 0..200;

my @time_diffs = map { $times[$_] - $times[$_-1] } 1..$#times;

$, = "\n";
$\ = "\n";
print @time_diffs;
[download]