$a='abcdef*2dfd';
$char='*';
$char=quotemeta($char);
@line=split/$char/, $a;
print "@line";