in reply to Undefined Subroutine error

Unrelated to your question, this line is not doing what I believe you want it to do:

my @kwrds = {"inhibitors", "activity", "complex", "activator", "activi
+ty", "activities", "activated", "proteins", "deficiency", "levels", "
+functions", "reductions", "protease", "proteases"};

[download]

Try replacing the {braces} with (parentheses).

Replies are listed 'Best First'.
Re^2: Undefined Subroutine error
by AnomalousMonk (Archbishop) on May 25, 2017 at 21:01 UTC

    Further to tobyink's post: Also consider using the  qw// operator (please see Quote-Like Operators in perlop): 

    my @kwrds = qw(
    inhibitors activity complex activator activity activities activate
+d
    proteins deficiency levels functions reductions protease proteases
    );

    [download]
    (Update: Use of  qw// here is really just for convenience.)

    Give a man a fish:  <%-{-{-{-<

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom