Haskell 打印时去掉JSON中的双引号

当我以这种方式进行模式匹配时：

case HashMap.lookup "abc" jsn of
  Just (Number n) -> putStrLn $ show n

case HashMap.lookup "abc" jsn of
  Just (String val) -> print val

它被打印为123.45（没有双引号），这是我想要的。当我这样做时：

case HashMap.lookup "abc" jsn of
  Just (Number n) -> putStrLn $ show n

case HashMap.lookup "abc" jsn of
  Just (String val) -> print val

它将其打印为“123.45”（带双引号）。在第二种情况下，我必须对字符串进行模式匹配，因为它是JSON中的字符串值。但我不想让它用双引号打印出来。我怎样才能摆脱它们

case HashMap.lookup "abc" jsn of
  Just (String val) -> putStrLn val

print

只是

putStrLn。show

，当您

显示一个字符串时，它会得到引号<代码>显示

将内容转换为字符串，因此您只需将字符串直接传递给

putStrLn

print

只是

putStrLn。show

，当您

显示一个字符串时，它会得到引号<代码>显示

将内容转换为字符串，因此您只需将字符串直接传递给

putStrLn