($x, $ENV{Z1Z1}) = ( '3', '2,1' );  # first time
  ($x, $ENV{Z1Z1}) = ( '2', '1' );  # second time
  ($x, $ENV{Z1Z1}) = ( '1', undef );  # third time