<%init> my $file = "$ENV{CONTEXT_DOCUMENT_ROOT}/$ARGS{keywords}"; return 0 unless -f $file; $r->content_type('text/plain'); open FH, $file or return $!; print $_ while ; close FH;