" without preceding quantity")
unless $first_term;
my $sth= $dbh->prepare("SELECT name,mass,volume".
" FROM vessels WHERE name LIKE ?");
my ($emsg,$ship,@smv)=
dbw_lookup_string($_,$sth,1,1,2,
" without preceding quantity")
unless $first_term;
my $sth= $dbh->prepare("SELECT name,mass,volume".
" FROM vessels WHERE name LIKE ?");
my ($emsg,$ship,@smv)=
dbw_lookup_string($_,$sth,1,1,2,