[Freeswitch-users] freeswitch get variable list after hangup in perl script

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") Many thanks ,