#!/usr/bin/perl
%data=();
foreach $r ( <STDIN> ) {
	chomp($r);
	if($r =~ /^AWD[A-Za-z0-9]{6}$/){
		if(!exists($data{$r})){
			$data{$r} = 1;
			print "$r\n";
		}
	} else {
		print "$r\n";
	}
}