#!/usr/bin/perl
# These are the modules the program utilizes.
# Strict is a module which compiles the code to avoid syntax issues.
# List::Util was utilized for part of the random selection .
# The POSIX module was utilized also in the random selection #function 
# Win32::OLE is for utilizing Excel within Perl.

use strict;
use File::Find;
use POSIX qw(ceil);
use List::Util 'shuffle';
use Win32::OLE::Const "Microsoft Excel";