gistfile1.txt

perl -MPath::Tiny=path -E 'my $this = path(".")->absolute; for my $path ( $this->children ) { next if $path->is_file; chdir $path->stringify; say "$path"; say qx{git status}; chdir $this->stringify }'

gistfile2.txt

function enmod() {
    cd /opt/otrs
    perl /home/otrsvm/module-tools/bin/otrs.ModuleTools.pl Module::Package::Install /home/otrsvm/OTRS/$1 /opt/otrs --verbose
}

function dismod() {
    cd /opt/otrs
    perl /home/otrsvm/module-tools/bin/otrs.ModuleTools.pl Module::Package::Uninstall /home/otrsvm/OTRS/$1 /opt/otrs --verbose
}