my $hr  = { foo => { bar => '/dev/null' } };
my $cmd_literal = 'ls $hr->{foo}->{bar}';
my $cmd = eval qq(return "$cmd_literal";);

print `$cmd`;

__output__

/dev/null