@y = ("this", "that"); *x = &{sub {\@_}}(@y[reverse 0..@y-1], "your"); 
print "@x\n"; # ==> that this your
$y[0] = "great"; # I change @y
print "@x\n"; # ==> that great your
# hey, why did @x change, I didn't do anything with @x!