Detect wrong component

fixes #23
I know this is not your code, but the canonical way to remove duplicates is something like

```perl
my @component_names = keys(map {$_ => 1} @ARGV);
```
(untested, may need sigils somewhere).