#!/usr/bin/env perl use Cwd; # create repo my $repoName = getcwd; $repoName =~ s:.*/projects/::; $repoName =~ s:.*/data/::; $repoName =~ s:.*kinglab/::; $repoName =~ s:/:_:g; system "bb create -c --owner jrflab --protocol ssh $repoName"; system "git init"; system "git remote add origin git\@bitbucket.org:jrflab/$repoName.git"; my $MAKEFILE = <Makefile"; print OUT $MAKEFILE; } system "git add Makefile"; system "git commit -m 'makefile'"; system "git push --set-upstream origin master";