use strict;
use warnings;

my $self = bless({});


  my $critical_failures = $self->_analyze_test_logs();
  print STDERR "Count of critical failures: $critical_failures->{'count'}\n";
  if($critical_failures->{'count'} != 0){
    print("!= 0\n");
  } else {
    print("== 0\n");
  }

sub _analyze_test_logs {
  my $self = shift;
  my $critical_failures = 0;
  my %critical_failures;
  $critical_failures{'count'} = 0;

  $critical_failures{'count'} = $critical_failures;
  if($critical_failures{'count'} == 0){
    print STDERR "The count of critical failures is 0.\n";
  }

  return \%critical_failures;
}

##</code><code>##

The count of critical failures is 0.
Count of critical failures: 0
== 0