こわくないConsul
事前に、ワークショップ用のサンプルプロジェクトをチェックアウトし、VMの作成だけしておきましょう。 --no-provision
でお願いします!
#!/usr/bin/perl | |
use strict; | |
use warnings; | |
use List::MoreUtils qw(any); | |
sub git; | |
chdir git('rev-parse --git-dir') . '/..'; | |
my @submodules = map [split /\s+/]->[-1], grep /^160000 /, git 'ls-files --stage'; |