NAME
Zoidberg::DispatchTable - class to tie dispatch tables
SYNOPSIS
use Zoidberg::DispatchTable;
my %table;
tie %table, q{Zoidberg::DispatchTable},
$self,
{ cd => '->Commands->cd' };
# The same as $self->parent->object('Commands')->cd('..') if
# a module can('parent'), else the same as $self->Commands->cd('..')
$table{cd}->('..');
$table{ls} = q{ls('-al')}
# The same as $self->ls('-al', '/data')
$table{ls}->('/data');
DESCRIPTION
This module can be used tie tie hashes functioning as dispatch tables. It enforces zoidbergs string notation for subroutines.
EXPORT
None by default.
AUTHOR
Jaap Karssenberg || Pardus [Larus] <j.g.karssenberg@student.utwente.nl>
Copyright (c) 2003 Jaap G Karssenberg. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/language/misc/Artistic.html