my ($a,$b,$c) = (0, 0, 0);