Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 16 lines (12 sloc) 0.361 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
#!/usr/bin/env perl
use strict;
use warnings;
use autodie;

my $url = shift or die "usage: $0 url [directory]\n";
my $directory = shift || do { $url =~ m{.*/(.+)}; $1 };

die "Directory $directory already exists\n" if -e $directory;

mkdir $directory;
chdir $directory;

system(qw(git svn init), $url);
system(qw(git svn fetch));
system(qw(git reset --hard));
Something went wrong with that request. Please try again.