#! perl -i.bak -p
    s/oldline/newline/