package UI;

use Object::Tiny qw(name);

sub hello {print "superclass hello\n"};

#sub age {print "what's your age?"};

package UI::Graphical;

use Object::Tiny qw(age);

@ISA = 'UI';

sub hello {print "make a window\n";}

package UI::Text;

@ISA = 'UI';

sub hello {print "hello world!\n";}

use lib q(.); use lib q(..); use lib q(../..); use lib q(../../..); use lib q(../../../..); my $ui = UI::Graphical->new(age => 10); print $ui->age(); use lib q(.); use lib q(..); use lib q(../..); use lib q(../../..); use lib q(../../../..); use Audio::Ecasound::Flow::Flow; my $ui = UI->new; $ui->hello; my $tui = UI::Text->new; $tui->hello; my $gui = UI::Graphical->new; $gui->hello; use lib q(.); use lib q(..); use lib q(../..); use lib q(../../..); use lib q(../../../..); use Audio::Ecasound::Flow::Flow; my $ui = UI->new; $ui->hello; my $tui = UI::Text->new; $tui->hello; my $gui = UI::Graphical->new; $gui->hello; use 5.008; use strict; use warnings;

our $VERSION = '0.01';

# Preloaded methods go here. package UI; our @ISA; use Object::Tiny qw(dummy); sub hello {print "superclass hello\n"};

package UI::Graphical; our @ISA = 'UI'; sub hello {print "make a window\n";} 1; package UI::Text; our @ISA = 'UI'; sub hello {print "hello world!\n"}

__END__ # Below is stub documentation for your module. You'd better edit it!

NAME

UI - Perl extension for blah blah blah

SYNOPSIS

use UI;
blah blah blah

ABSTRACT

This should be the abstract for UI.
The abstract is used when making PPD (Perl Package Description) files.
If you don't want an ABSTRACT you should also edit Makefile.PL to
remove the ABSTRACT_FROM option.

DESCRIPTION

Stub documentation for UI, created by h2xs. It looks like the author of the extension was negligent enough to leave the stub unedited.

Blah blah blah.

EXPORT

None by default.

SEE ALSO

Mention other useful documentation such as the documentation of related modules or operating system documentation (such as man pages in UNIX), or any relevant external documentation such as RFCs or standards.

If you have a mailing list set up for your module, mention it here.

If you have a web site set up for your module, mention it here.

AUTHOR

Joel Roth, <jroth@dsl-verizon.net>

COPYRIGHT AND LICENSE

Copyright 2007 by Joel Roth

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

cpanm Audio::Multitrack

perl -MCPAN -e shell
install Audio::Multitrack