$ perl -le 'print ref \substr "foo", 1'
LVALUE