Gestinanna::Shell::Base - base commands and support for command extensions
package Gestinanna::Shell::MyCommands;
use base qw(Gestinanna::Shell::Base);
%COMMANDS = (
command => \&do_command,
);
%EXPORTED_COMMANDS = (
mycommand => \do_mycommand,
);
James G. Smith, <jsmith@cpan.org>
Copyright (C) 2002 Texas A&M University. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
