$ perl  remove_duplicates.pl
$match =
foo1
foo2
foo3
foo4
foo5
foo3
foo2

@match_to_array = foo1 foo2 foo3 foo4 foo5 foo3 foo2

@r = foo1 foo2 foo3 foo4 foo5