issue for scrooloose/syntastic perl file syn check return abnormal 1

issue.txt

perl file syn check all error return abnormal 1

patch .....\Perl\Critic\Command.pm

sub run {
    use Data::Dumper::Concise;
    my %options    = _get_options();
    @files         = _get_input(@ARGV);

    my ($violations, $had_error_in_file) = _critique(\%options, @files);
  +  return $EXIT_SUCCESS;+
    return $EXIT_HAD_FILE_PROBLEMS  if $had_error_in_file;
    return $EXIT_NO_FILES           if not defined $violations;
    return $EXIT_HAD_VIOLATIONS     if $violations;

    return $EXIT_SUCCESS;
}

just work fine ^_^