In that case, you going to have to explain your problem a lot more clearly.

What is "blow code"?

You mention a var, $code twice, but it doesn't appear anywhere in your examples.

What you appear to be saying is that you have a program source or sources, that makes calls to a function Lique() in a package CX, and that you want to parse these sources, locate each call to new CX::Lique() or CX::Lique->new() and the extract the parameters passes on these calls into a hashref %info using a regex?

Am I closer?