$ perl -Mstrict -wle '
> my $foo = q{foo};
> my $bar = q{f};
>  print ${$bar . q{oo}};'
Can't use string ("foo") as a SCALAR ref while "strict refs" in use at -e line 4.
$