note
sen
<p>Hi Sunil,
If i understand your requirement correclty,
<p>try this,
<code>Customer_."$timestmp"._100</code>
<br>
<br>
<B>Update:</B>
<code>
$a=Customer100;
$b=20130201;
$a=~ /(.*?)(\d+)/;
$a= $1."_".$b."_".$2;
print $a;
</code>
<B>Update1:</B>
<code>
$a=~ s/(.*?)(\d+)/$1\_$b\_$2/;
</code>
1011248
1011248