File: Bar.pm

package info (click to toggle)
libdancer2-perl 0.400001%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 2,580 kB
  • sloc: perl: 8,461; makefile: 9
file content (23 lines) | stat: -rw-r--r-- 383 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
package Dancer2::Plugin::Bar;

use strict;
use warnings;

use Dancer2::Plugin;

sub baz { 'bazbazbaz' }

sub BUILD {
    my $plugin = shift;

    $plugin->app->add_hook( Dancer2::Core::Hook->new(
            name => 'after',
            code => sub { my $resp = shift; $resp->content( $resp->content 
                    . 'plugin Bar loaded'
                ) }
        ));
}

1;