% perl -e 'while(<>){unless($f++){s/Davenport/OASIS/;s/2\.4\.1/4.1/;s/\"\/opt.+\"//;}print}'