$ cat 11128519.pl 
use strict;
use warnings;
use MCE::Loop;
MCE::Loop->init (
	chunk_size  => 1,
	max_workers => 10,
	use_threads => 0
);
my %result;

MCE::Util::get_ncpu

  %result = mce_loop {
	my ($mce, $chunk_ref, $chunk_id) = @_;
	my %ret;
	for my $item (@{$chunk_ref}) {
		my $ret = tags_get ($item);
		$ret{$item->[1]} = $ret->{$item->[1]};

		#say $ret{$_->[1]};
	}

	$mce->gather (%ret);
}
$fileprobe;
MCE::Loop->finish;
$ perlcritic 11128519.pl
11128519.pl source OK
$ perlcritic -2 11128519.pl
Code not contained in explicit package at line 1, column 1.  Violates encapsulation.  (Severity: 4)
No package-scoped "$VERSION" variable found at line 1, column 1.  See page 404 of PBP.  (Severity: 2)
Module does not end with "1;" at line 26, column 1.  Must end with a recognizable true value.  (Severity: 4)
$ perlcritic --version
1.125
$