:object_dir=../objGH060NTSCI

##</code><code>##

:object_dir=../nbssbase/$vob/objGH060NTSCI

##</code><code>##

while <infile>
if $_ =~ :object_dir
$_ =~ s/\..//../nbssbase/$vob/g;