just to clarify The possible arguments to the $filetime->Create() method are as follows.

year, month, wday, day, hour, minute, second, msecond

wday is the day of the week, and msecond is the number of millisecond. If you dont specify any arguments to Create() you will get an eight element list, with the time fields in that order. I would use the following snippet for what you want

my $filetime = Win32::FileTime->new($file);
my ($year,$month,$day,$hour,$minute) = 
    $filetime->Create (qw[year month day hour minute]);
[download]