X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Frbn.pl;h=eb2c743ecd9f2ff46348a96939532975451a2162;hb=dbc07bca561550cf5dd928796e1747f480929329;hp=f92b32019c8c8a8f218c3497a4343cc68aef08f8;hpb=5de505775c0af733dfe3f463a8ad0cde5feb3d9c;p=spider.git

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;