sub insert_lexicon{ my ($self) = @_; $statement = 'INSERT INTO lexicon ( word, meaning, auid) VALUES( \'$word\', \'$meaning\', \'$auid\');'; return ($statement); }