hi all, below mentioned example is in lua Language for getting variable in Freeswitch.

can you please help me how to get in Perl language . 

local caller_id = session:getVariable("caller_id_number")