comparing columns using regular expression

Select or download this

file1:
Box of Joe     CA12DE    12345
...
BA23DF
4F4FGG

Select or download this

Name          Number     Count
Box of Joe    CA12DE     12345
Small         FFFFF3     0123X
None          XXXXXX     00000

Select or download this

#!/usr/bin/perl

...

#I have gotten this far but now I want to use regular expression that 
+matches each entry of the second column of file1 to the entire @uniqu
+e_f.  Thus, if the match is NOT DEFINED, then it should print the who
+le line.
Thanks!

Select Code to Download