8f1c6e
diff -up a2ps-4.13/sheets/perl.ssh.perl a2ps-4.13/sheets/perl.ssh
8f1c6e
--- a2ps-4.13/sheets/perl.ssh.perl	2007-09-26 10:30:43.000000000 +0100
8f1c6e
+++ a2ps-4.13/sheets/perl.ssh	2007-09-26 10:47:47.000000000 +0100
8f1c6e
@@ -106,9 +106,9 @@ operators are
8f1c6e
     (/(s|tr)/			# 1. The command: `tr' or `s'
8f1c6e
      /(([[:punct:]])/		# 2. The delimiter
8f1c6e
      /(/			# 3. The *two* regexps
8f1c6e
-     /(.|\\\\.)*/		#   First regexp
8f1c6e
+     /(\\\\.)*/			#   First regexp
8f1c6e
      /\\3/			#   Separator
8f1c6e
-     /(.|\\\\.)*/		#   Second Regexp
8f1c6e
+     /(\\\\.)*/			#   Second Regexp
8f1c6e
      /)/			#
8f1c6e
      /\\3)/			# Closer
8f1c6e
      \1 Keyword_strong, \2 Plain),