Amanda::Application - perl utility functions for Applications.
package Amanda::Application::my_application; use base qw(Amanda::Application);
sub new { my $class = shift; my ($foo, $bar) = @_; my $self = $class->SUPER::new();
$self->{'foo'} = $foo; $self->{'bar'} = $bar;
return $self; }
# Define all command_* subs that you need, e.g., sub command_support { my $self = shift; # ... }
package main;
# .. parse arguments ..
my $application = Amanda::Application::my_application->new($opt_foo, $opt_bar); $application->do($cmd);
This page was automatically generated Fri Feb 5 19:41:21 2010 from the Amanda source tree, and documents the most recent development version of Amanda. For documentation specific to the version of Amanda on your system, use the 'perldoc' command.