my %symbols = (
   'wonderFull' => 'The String I want to get at'
);
my ($var1,$var2) = qw/wonder Full/
print $symbols{ $var1 . $var2 }