{
    @lines = map { s/root \(hd1,0\)/root (hd0,0)/ ; $_ } @lines;
    $OUT = "";
}

