kainwinterheart
17.11.2011 13:07 workE6F3A974
unless( $anum =~ s/^((.*)((\s)|(I>)))(.*)$/$1$external/ )
{
$anum = $external;
}