while (<DATA>) {
	chomp;
	if (m{\A (.*?) (\d+ | [A-Z]+) \z}x) {
		printf "Key = %-6s - Suffix = %s\n", $1, $2;
	} else {
		die "Invalid data: $_";
	}
}

__DATA__
AAA30
BBC5
SHT12H
DAL33B
BBC49
AAA31
BBC8
BBC3
DAL33A
BBC6
SHT12G
BBC50