in reply to code review

use strict;
use warnings;

[download]

In Section Seekers of Perl Wisdom