File: Foo.pm

package info (click to toggle)
libmojolicious-perl 2.98%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 2,968 kB
  • sloc: perl: 10,178; sh: 48; makefile: 8
file content (12 lines) | stat: -rw-r--r-- 319 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
 
package MojoliciousTest2::Foo;
use Mojo::Base 'Mojolicious::Controller';

# "I can't afford to keep running people over.
#  I'm not famous enough to get away with it."
sub test {
  my $self = shift;
  $self->res->headers->header('X-Bender' => 'Bite my shiny metal ass!');
  $self->render(text => $self->url_for);
}

1;