in reply to Re^2: Data not getting stored in an array
in thread Data not getting stored in an array

By /\.lib(?:\.\d+)?$/ or more explicitly: 
find(sub {
    push @libs, "$_\n" if -f && /\.lib(?:\.\d+)?$|serport|serport_d/ &
+& !$seen{$_}++;
}, "$options{data}");

[download]

In Section Seekers of Perl Wisdom