Variable "$x" will not stay shared at ./nested.pl line 9.