From: Matthieu Moy Date: Thu, 01 Sep 2011 05:26:05 GMT Subject: Re: [PATCH v6] Add a remote helper to interact with mediawiki (fetch & push) Message-ID: In-Reply-To: <7vobz5xg7u.fsf@alter.siamese.dyndns.org> Junio C Hamano writes: > Matthieu Moy writes: > >> Here: >> >> + for my $refspec (@refsspecs) { >> + unless ($refspec =~ m/^(\+?)([^:]*):([^:]*)$/) { >> + die("Invalid refspec for push. Expected : or +:"); >> + } >> + my ($force, $local, $remote) = ($1 eq "+", $2, $3); >> >> At this point, $force is a boolean saying whether there were a +, and >> $local and $remote are as you can guess. > > It may be slightly more Perl-ish to hoist the "0-or-1" outside the group > and rely on $1 becoming undef, like this: > > my ($force, $local, $remote) = $refspec =~ /^(\+)?([^:]*):([^:]*)$/ > or die(...); Thanks, I didn't know I could do this. -- Matthieu Moy http://www-verimag.imag.fr/~moy/