"~~" in sync-all

[Kazu Yamamoto ( 山本和彦 )]

Hi,

A recent change[1] to sync-all introduces the "~~" operator of
Perl. It seems to me that this operator is not supported by old Perl.

	% perl --version
	This is perl, v5.8.8 built for i386-linux-thread-multi

	% ./sync-all -r git://github.com/ghc --testsuite get
	syntax error at ./sync-all line 904, near ""pull" ~"
	BEGIN not safe after errors--compilation aborted at ./sync-all line 906.

Sorry for using old Perl but I appreciate if this operator will be
replaced with others.

[1]
commit 968998e69a745e38a47f4771a3244008f19ebc4a
Author: Erik de Castro Lopo <erikd at mega-nerd.com>
Date:   Mon Aug 5 11:22:04 2013 +1000

--Kazu