File Coverage

blib/lib/BlankOnDev/command.pm
Criterion Covered Total %
statement 12 18 66.6
branch n/a
condition n/a
subroutine 4 6 66.6
pod 0 2 0.0
total 16 26 61.5


line stmt bran cond sub pod time code
1             package BlankOnDev::command;
2 1     1   6 use strict;
  1         2  
  1         26  
3 1     1   5 use warnings FATAL => 'all';
  1         2  
  1         25  
4              
5             # Import :
6 1     1   5 use Term::ReadKey;
  1         2  
  1         56  
7 1     1   7 use BlankOnDev::Rilis;
  1         1  
  1         126  
8              
9             # Version :
10             our $VERSION = '0.1004';
11              
12             # Subroutine for bazaar command :
13             # ------------------------------------------------------------------------
14             sub bzr {
15 0     0 0   my %data = ();
16              
17             # Bzr Command :
18 0           $data{'bzr'} = {
19             'branch' => => 'bzr branch',
20             'bzr-export' => 'bzr fast-export',
21             'bzr-fast-import' => 'git fast-import'
22             };
23 0           return \%data;
24             }
25             # Subroutine for github command :
26             # ------------------------------------------------------------------------
27             sub github {
28 0     0 0   my %data = ();
29              
30             # Git Command :
31 0           $data{'git'} = {
32             'cfg-name' => 'git config --global user.name',
33             'cfg-email' => 'git config --global user.email',
34             'cfg-credential-cache' => 'git config --global credential.helper cache',
35             'cfg-creden-cache-clear' => 'git config --global --unset credential.helper',
36             'cfg-list' => 'git config --list',
37             'cfg-list' => 'git config --list',
38             'init' => 'git init',
39             'add' => 'git add',
40             'commit' => 'git commit -m',
41             'reset-head' => 'git reset HEAD',
42             'remote' => 'git remote add origin',
43             'push' => 'git push -u origin master',
44             'push-force' => 'git push origin master --force',
45             'push-repo' => 'git push -u origin',
46             'checkout' => 'git checkout -b',
47             'fetch' => 'git fetch origin',
48             'merge' => 'git merge origin origin/master',
49             'pull' => 'git pull origin',
50             'branch' => 'git branch',
51             };
52 0           return \%data;
53             }
54             1;