24 lines
555 B
Perl
24 lines
555 B
Perl
#!/usr/bin/env perl
|
|
#-----------------------------------------------------------------------------------------------
|
|
#
|
|
# clm build-namelist driver
|
|
#
|
|
# Placing all of build-namelist into CLMBuildNamelist.pm means we can unit test the module.
|
|
#
|
|
require 5;
|
|
|
|
use strict;
|
|
|
|
BEGIN {
|
|
# ensure that the cesm create_X scripts can find CLMBuildNamelist.pm
|
|
use File::Basename qw(dirname);
|
|
use Cwd qw(abs_path);
|
|
my $dirname = dirname(abs_path($0));
|
|
my @dirs = ($dirname, );
|
|
unshift @INC, @dirs;
|
|
}
|
|
|
|
use CLMBuildNamelist qw(main);
|
|
|
|
CLMBuildNamelist::main();
|