Here is one possible method:

    #!/usr/bin/perl -wl

    my @array1 = ("tmp0.size", "tmp0.buffersize", "tmp0.value",
                 "tmp1.size",  "tmp1.buffersize", "tmp1.value");
    my @array2 = ("size", "buffersize");
    my @result = @array1;


    foreach my $pattern (@array2) {
        my $seen = 0;
        my @tmp;
        foreach (@result) {
            push @tmp, $_ if     /\.$pattern$/ and not $seen++;
            push @tmp, $_ if not /\.$pattern$/;
        }
        @result = @tmp;
    }

    print "@result";
[download]

--
John.