paaing variable in regular expression PERL

hi all

say I have a target file as
-----
-----
aaaa = { bbbbbbbbbbbbbbbbbbbb}
qqqq ={ dddddddddddd,
cccccccccccccc}
-------
--------
and i need output as
{ bbbbbbbbbbbbbbbbbbbb}
or
{ dddddddddddd,
cccccccccccccc} depending on aaaa or qqqq


so if i use

echo $Result |perl -lne "print if / aaaa ={ /../ }"
i get result

but i need to put it in loop

while read SOMETHING; do

echo $Result |perl -lne "print if / $SOMETHING={ /../ }"

done

I am not able to do it.
Can any one help me...
regards
kris