my $x = 'INC'; unshift @$x, ...;