$_ = 1 for my ($x, $y, $z); [download]
In reply to Re: Initialisation of variables by tybalt89 in thread Initialisation of variables by Anonymous Monk