source: branches/UKMO/r6232_tracer_advection/NEMOGCM/EXTERNAL/fcm/lib/Fcm/CLI/Invoker/CM.pm @ 9295

Last change on this file since 9295 was 9295, checked in by jcastill, 3 years ago

Remove svn keywords

File size: 1.4 KB
Line 
1# ------------------------------------------------------------------------------
2# (C) Crown copyright Met Office. All rights reserved.
3# For further details please refer to the file COPYRIGHT.txt
4# which you should have received as part of this distribution.
5# ------------------------------------------------------------------------------
6use strict;
7use warnings;
8
9package Fcm::CLI::Invoker::CM;
10use base qw{Fcm::CLI::Invoker};
11
12use Fcm::Cm qw{cli};
13
14################################################################################
15# Invokes the sub-system
16sub invoke {
17    my ($self) = @_;
18    return cli($self->get_command(), @ARGV);
19}
20
211;
22__END__
23
24=head1 NAME
25
26Fcm::CLI::Invoker::CM
27
28=head1 SYNOPSIS
29
30    use Fcm::CLI::Invoker::CM;
31    $invoker = Fcm::CLI::Invoker::CM->new();
32    $invoker->invoke();
33
34=head1 DESCRIPTION
35
36This class extends L<Fcm::CLI::Invoker|Fcm::CLI::Invoker> an inherits all its
37methods. An object of this class is used to invoke a command in the CM
38sub-system.
39
40It is worth noting that this is not yet a full implementation.
41
42=head1 METHODS
43
44See L<Fcm::CLI::Invoker|Fcm::CLI::Invoker> for a list of inherited methods.
45
46=over 4
47
48=item invoke()
49
50Invokes a command in the CM sub-system.
51
52=back
53
54=head1 TO DO
55
56Bring the CM system into this framework.
57
58Unit tests.
59
60=head1 SEE ALSO
61
62L<Fcm::Cm|Fcm::Cm>,
63L<Fcm::CLI::Subcommand|Fcm::CLI::Subcommand>
64
65=head1 COPYRIGHT
66
67E<169> Crown copyright Met Office. All rights reserved.
68
69=cut
Note: See TracBrowser for help on using the repository browser.