my $string = 'ID13';
say join('', grep( /[A-Za-z]/, split('',$string) ) );