Help for this page
my $fso = Win32::OLE->new( 'Scripting.FileSystemObject' ); for my $Path (@ARGV) { my $Match = {}; );