package GRAQ::Menu;

use base qw(Apache2::Filter)
...
sub handler :FilterRequestHandler()
{
  my ($f) = @_;
  my $r = $f->r;
...
}