my $q = sub {
  my $var = shift; # 'lang' in this case
  return 1;
}

##</code><code>##

$q->('lang'); # one way
&{$q}('lang'); # another way

##</code><code>##

print ref($q);

##</code><code>##

$q->h1('lang'); # instead of $q->('lang')