my $var5 = sprintf 'aaa/%s', $test_hash{ "${test}_bar" };   # inside-out
print("var5 = $var5\n");