source:
branches/UKMO/dev_r5518_min_temp_wo_ice/NEMOGCM/EXTERNAL/fcm/bin/fcm
Last change on this file was 6331, checked in by deazer, 8 years ago | |
---|---|
File size: 1.6 KB |
Line | |
---|---|
1 | #!/usr/bin/env perl |
2 | #------------------------------------------------------------------------------- |
3 | # (C) Crown copyright Met Office. All rights reserved. |
4 | # For further details please refer to the file COPYRIGHT.txt |
5 | # which you should have received as part of this distribution. |
6 | #------------------------------------------------------------------------------- |
7 | use strict; |
8 | use warnings; |
9 | |
10 | use FindBin; |
11 | use lib "$FindBin::Bin/../lib"; |
12 | use Fcm::CLI; |
13 | use Fcm::Interactive; |
14 | |
15 | if (!caller()) { |
16 | main(@ARGV); |
17 | } |
18 | |
19 | sub main { |
20 | local(@ARGV) = @_; |
21 | if (@ARGV && $ARGV[0] eq 'gui-internal') { |
22 | shift(@ARGV); |
23 | Fcm::Interactive::set_impl( |
24 | 'Fcm::Interactive::InputGetter::GUI', |
25 | {geometry => shift(@ARGV)}, |
26 | ); |
27 | } |
28 | Fcm::CLI::invoke(); |
29 | } |
30 | |
31 | __END__ |
32 | |
33 | =head1 NAME |
34 | |
35 | fcm |
36 | |
37 | =head1 SYNOPSIS |
38 | |
39 | fcm SUBCOMMAND [OPTIONS] [ARGUMENTS] |
40 | |
41 | =head1 OVERVIEW |
42 | |
43 | B<fcm> is the command line client for code management commands, the extract |
44 | system and the build system of the Flexible Configuration Management (FCM) |
45 | system. For full detail of the system, please refer to the FCM user guide, |
46 | which you should receive with this distribution in both HTML and PDF formats. |
47 | |
48 | Run "fcm help" to access the built-in tool documentation. |
49 | |
50 | =head1 AUTHOR |
51 | |
52 | FCM Team L<fcm-team@metoffice.gov.uk>. |
53 | Please feedback any bug reports or feature requests to us by e-mail. |
54 | |
55 | =head1 SEE ALSO |
56 | |
57 | L<svn (1)|svn>, |
58 | L<perl (1)| perl>, |
59 | L<Fcm::CLI|Fcm::CLI> |
60 | |
61 | =head1 COPYRIGHT |
62 | |
63 | You can use this release of B<FCM> freely under the terms of the FCM LICENSE, |
64 | which you should receive with this distribution. |
65 | |
66 | =cut |
Note: See TracBrowser
for help on using the repository browser.