From 36a27ea18b04934fcbb833cbcd2632af70486c97 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Rafa=C5=82=20D=C5=82ugo=C5=82=C4=99cki?= Date: Fri, 1 Mar 2013 16:53:43 +0100 Subject: [PATCH] Git-style only one argument for script. --- prj-create-repo.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/prj-create-repo.pl b/prj-create-repo.pl index bf083c1..fc8e623 100755 --- a/prj-create-repo.pl +++ b/prj-create-repo.pl @@ -5,10 +5,11 @@ use warnings; use Config::General; use Net::SSH::Perl; -# prj-create-repo.pl "login@host" "path/project.git" +# prj-create-repo.pl "login@host:path/project.git" my ($login, $host) = split(/@/, shift); -my $path = shift; +my $path; +($host, $path) = split(/:/, $host); print "Logging to $host...\n"; my $ssh = Net::SSH::Perl->new($host, debug => 0); -- 2.30.2