push @arry, ( $var ) x $cnt;