From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 4 Jan 2017 22:17:14 +0000 (+0000)
Subject: remove args typo from rbn.pl
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=dbc07bca561550cf5dd928796e1747f480929329;p=spider.git

remove args typo from rbn.pl
---

diff --git a/perl/rbn.pl b/perl/rbn.pl
index f92b3201..eb2c743e 100755
--- a/perl/rbn.pl
+++ b/perl/rbn.pl
@@ -39,7 +39,7 @@ GetOptions('host=s' => \$host,
 		   'want=s' => sub {
 			   my ($name, $value) = @_;
 			   $wantcw = $wantrtty = $wantpsk = $wantbeacon = 0;
-			   for (split /:,|/, $value) {
+			   for (split /[:,\|]/, $value) {
 				   ++$wantcw if /^cw$/i;
 				   ++$wantpsk if /^psk$/i;
 				   ++$wantrtty if /^rtty$/i;