fix some perl critic issues
Merge pull request #1324 from szabgab/szabgab/perl-critic

fix some perl critic issues