my $a = 0;
my $b = 0;
my $c = 0;