Help for this page

Select Code to Download


  1. or download this
       sub FileTimeToSystemTime ($)
        {
    ...
        unshift @retval, \@names;
        return @retval;
        }
    
  2. or download this
        my ($names, $Year, $Month, $DayOfWeek, $Day, $Hour, $Minute, $Seco
    +nd, $Milliseconds)= FileTimeToSystemTime ($int64);
    
  3. or download this
    my $value= \(FileTimeToSystemTime ($int64));
    my $Day= $value->{Day};
    # ... etc.