my $test = Win32::File -> GetAttributes ('ftp.pl');