Global symbol "$query" requires explicit package name (did you forget to declare "my $query"?) at ...