diff --git a/rabbitmq_consumers b/rabbitmq_consumers
index 3b603d0..11b02f5 100755
--- a/rabbitmq_consumers
+++ b/rabbitmq_consumers
@@ -70,6 +70,4 @@ fi
 # real work - i.e. display the data. Almost always this will be
 # "value" subfield for every data field.
 
-HOME=$HOME rabbitmqctl list_queues -p $VHOST name consumers| \
-	grep -v "^Listing" | grep -v "done.$" | \
-    perl -nle'($q, $s) = split; $q =~ s/[.=-]/_/g; print("$q.value $s")'
+HOME=$HOME rabbitmqctl list_queues -p $VHOST name consumers| grep -v "^Listing" | grep -v "done.$" | grep -v "\.\.\." | sed "s/[\t]/.value /g"
diff --git a/rabbitmq_messages b/rabbitmq_messages
index 68a37da..436c203 100755
--- a/rabbitmq_messages
+++ b/rabbitmq_messages
@@ -70,6 +70,4 @@ fi
 # real work - i.e. display the data. Almost always this will be
 # "value" subfield for every data field.
 
-HOME=$HOME rabbitmqctl list_queues -p $VHOST | \
-	grep -v "^Listing" | grep -v "done.$" | \
-	perl -nle'($q, $s) = split; $q =~ s/[.=-]/_/g; print("$q.value $s")'
+HOME=$HOME rabbitmqctl list_queues -p $VHOST | grep -v "^Listing" | grep -v "done.$" | grep -v "\.\.\." | sed "s/[\t]/.value /g"
diff --git a/rabbitmq_messages_unacknowledged b/rabbitmq_messages_unacknowledged
index 62bbcc7..a8d0a92 100755
--- a/rabbitmq_messages_unacknowledged
+++ b/rabbitmq_messages_unacknowledged
@@ -70,6 +70,5 @@ fi
 # real work - i.e. display the data. Almost always this will be
 # "value" subfield for every data field.
 
-HOME=$HOME rabbitmqctl list_queues -p $VHOST name messages_unacknowledged | \
-	grep -v "^Listing" | grep -v "done.$" | \
-    perl -nle'($q, $s) = split; $q =~ s/[.=-]/_/g; print("$q.value $s")'
+
+HOME=$HOME rabbitmqctl list_queues -p $VHOST name messages_unacknowledged | grep -v "^Listing" | grep -v "done.$" | sed "s/[\t]/.value /g"
diff --git a/rabbitmq_messages_uncommitted b/rabbitmq_messages_uncommitted
index 5081bc0..b2869d1 100755
--- a/rabbitmq_messages_uncommitted
+++ b/rabbitmq_messages_uncommitted
@@ -70,6 +70,4 @@ fi
 # real work - i.e. display the data. Almost always this will be
 # "value" subfield for every data field.
 
-HOME=$HOME rabbitmqctl list_channels -p $VHOST name messages_uncommitted | \
-	grep -v "^Listing" | grep -v "done.$" | \
-    perl -nle'($q, $s) = split; $q =~ s/[.=-]/_/g; print("$q.value $s")'
+HOME=$HOME rabbitmqctl list_channels -p $VHOST name messages_uncommitted | grep -v "^Listing" | grep -v "done.$" | sed "s/[\t]/.value /g"
diff --git a/rabbitmq_queue_memory b/rabbitmq_queue_memory
index 554e098..c0b3d83 100755
--- a/rabbitmq_queue_memory
+++ b/rabbitmq_queue_memory
@@ -70,6 +70,4 @@ fi
 # real work - i.e. display the data. Almost always this will be
 # "value" subfield for every data field.
 
-HOME=$HOME rabbitmqctl list_queues -p $VHOST name memory | \
-	grep -v "^Listing" | grep -v "done.$" | \
-    perl -nle'($q, $s) = split; $q =~ s/[.=-]/_/g; print("$q.value $s")'
+HOME=$HOME rabbitmqctl list_queues -p $VHOST name memory | grep -v "^Listing" | grep -v "done.$" | sed "s/[\t]/.value /g"