my $x = 10;
$x = '2' . $x;
print $x + 0;

##</code><code>##

require Data::Dumper;
print Dumper(\%call_info);