sub unique { my %x; @x{@_} = @_; values %x }

##</code><code>##

my @final =
    map {
        # Something
    } unique grep {
        # Something
    } map {
        # Something
    } @start;