2
#******************************************************************************
4
#* $Id: mkvsmod.pl 2327 2009-04-22 11:42:33Z scribe $
6
#* Copyright 1998-2009 CrossWire Bible Society (http://www.crosswire.org)
7
#* CrossWire Bible Society
9
#* Tempe, AZ 85280-2528
11
#* This program is free software; you can redistribute it and/or modify it
12
#* under the terms of the GNU General Public License as published by the
13
#* Free Software Foundation version 2.
15
#* This program is distributed in the hope that it will be useful, but
16
#* WITHOUT ANY WARRANTY; without even the implied warranty of
17
#* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18
#* General Public License for more details.
29
$line =~ /(.+\d+:\d+:?) +(.*)/;
32
open (BUF, ">buffer");
35
$x = `addvs -a ./ \"$ref\" buffer`;