my $username = Win32::Perms->new($filename)->Owner;