Please note that while I provide this script in
the hopes that it will be useful to you, I make NO GUARANTEES OR WARRANTIES
OF ANY KIND. The code is provided subject to the same terms as Perl itself.
For more information, please refer to the Perl Artistic License.