WATANABE Hiroaki > Net-NicoVideo-0.28 > Net::NicoVideo::Decorator

Download:
Net-NicoVideo-0.28.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01_26   Source  

NAME ^

Net::NicoVideo::Decorator - Interface decorator pattern

SYNOPSIS ^

    package Foo::Bar;
    use base qw(Net::NicoVideo::Decorator);

    sub new {
        my ($class, $component, @extra_args) = @_;
        my $self = $class->SUPER::new($component);
        ...
        $self->initialize(@extra_args);
        ...
        ...
    }
    

    package main;
    Foo::Bar->new(Some::Class->new);

DESCRIPTION ^

This provides common interface for the decorator pattern easily.

syntax highlighting: