b05_ln_rmmm_0.85v_0.00c_core   /p/ldb/ln/b05_ln_rmmm_0.85v_0.00c_core.ldb:b05_ln_rmmm_0.85v_0.00c_core.ldb
    b05_nn__rmmm_g9v_098c_core   /p/ldb/nn/b05_nn__rmmm_g9v_098c_core.ldb:b05_nn__rmmm_g9v_098c_core
    b05_un_rsss_0.66v_0.44c_core   /p/ldb/un/b05_un_rsss_0.66v_0.44c_core.ldb:b05_un_rsss_0.66v_0.44c_core  

##</code><code>##

while (@arr2 = <CF>){

foreach $line (@arr2) {

	if ($line =~ m/(.*)   (.*)/) {

		$libn = "$1";
		#$libn =~ s/^\s+//;

		$libn =~ s/ /${1}.lib/x;
		print "$libn\n";
                push (@arr3, $libn);
		$string = "vi $libn";
		system ($string);
						}
					}
			}
}

##</code><code>##

b05_ln_rmmm_0.85v_0.00c_core.lib
b05_nn__rmmm_g9v_098c_core.lib
b05_un_rsss_0.66v_0.44c_core.lib