Select Code to Download

#! c:/perl/bin/perl.exe -slw
$|++;
...
{
   print "$key : $file->{$key}\n";
}

C:\Perl\FSO>archive.pl

...
Type : Application

C:\Perl\FSO>

use Win32::OLE::Variant;

#! c:/perl/bin/perl.exe -slw
$|++;
...
   }  
}

C:\Perl\FSO>archive.pl
...

C:\Perl\FSO>