perl> $s = 'abcde';;
perl> $lv = \ substr $s, 1, 3;;
perl> print $$lv;;
bcd
perl> $$lv = '1234';;
perl> print $$lv;;
123                   ## The lvref stil refers to a 3 char substring.
                      ## this could be adjusted to reflect the new length.