my $statement = qq(
           INSERT INTO dickens VALUES ($word, $Line{$word})
        );