my ($one, $two, $three, $four) = 0; #### my $one = my $two = my $three = my $four = 0; #### my ($one, $two, $three, $four) = (0,0,0,0);
## my $one = my $two = my $three = my $four = 0; ##
## my ($one, $two, $three, $four) = (0,0,0,0);