Select Code to Download

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

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