my ( $confstringstring ) = @_;
my (@libs, @others);
foreach ( split ' ', $confstringstring ) {
if ( m/(-(Wl,-R|[LlR])[^ ]*)/) {
if ( m/(^-(Wl,-R|[LlR])[^ ]*)/) {
push @libs, $1
} else {
push @others, $_;