X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/e929a76b14922a7077596a747fc1fcd1bdd6b9ea..265075c0d13cbdf53c9e662decbb83fc34d4e7a4:/h2pl/tcbreak2

diff --git a/h2pl/tcbreak2 b/h2pl/tcbreak2
index fcbf926..d9fd735 100644
--- a/h2pl/tcbreak2
+++ b/h2pl/tcbreak2
@@ -12,6 +12,6 @@ $c = getc;
 
 print "$c\n";
 
-printf "you gave me `%s', which is 0x%02x\n", $c, ord($c);
+printf "you gave me '%s', which is 0x%02x\n", $c, ord($c);
 
 &cooked;