zsh/plugins/git_install.pl

   1 #!/usr/bin/perl -w
   2 #
   3 my $filename = "git_lists";
   4
   5 my %hash=();
   6
   7 open FILE, "$filename";
   8 while (<FILE>){
   9         chomp;
  10         my ($name, $url) = split;
  11         $hash{$name} = $url;
  12 }
  13 close FILE;
  14
  15 foreach (values %hash) {
  16         system "git clone " . $_;
  17 }