From dbc07bca561550cf5dd928796e1747f480929329 Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 4 Jan 2017 22:17:14 +0000
Subject: [PATCH] remove args typo from rbn.pl

---
 perl/rbn.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.34.1