File Coverage

File:bin/filesync
Coverage:100.0%

linestmtbrancondsubtimecode
1#!/usr/bin/env perl
2
3# Thin wrapper: everything, including error reporting and the exit code,
4# lives in App::FileSync::CLI so it can be tested without a subprocess.
5
6
78
78
78
154642
56
1259
use strict;
7
78
78
78
124
33
1550
use warnings;
8
78
78
78
14060
638746
130
use autodie qw(:all);
9
10
78
78
78
773352
38662
5300
use FindBin qw($Bin);
11
12# A checkout's lib/ first, so bin/ runs the code beside it; an installed
13# copy finds the modules on @INC as usual.
14
78
78
78
14327
22445
262
use lib "$Bin/../lib";
15
16
78
78
78
14849
107
1043
use App::FileSync::Platform;
17
78
78
78
16874
170
1875
use App::FileSync::CLI;
18
19
78
6247272
exit App::FileSync::CLI::run_client(@ARGV);
20