while (<INfile>)
{
if $_ =~ m/\w+\.o/;
$fileOne = $_;
while (<INfile2>)
{
if $_ =~ $fileOne;
$_ = $fileTwo;
'cmp $fileOne $fileTow`;
}
}