如何从perl warn命令禁用时间戳

Question

如何从warn（）中删除时间戳和脚本名称：

[Mon Jun 12 10:31:38 2017] db_insert.pl:  "subjects": ["Government - Comparative", "Politics / Current Events"], "revision": 4}

Answer 1

该消息不是由Perl的warn

生成的

如果我生成一般警告消息，它看起来像这样

$ perl -e 'warn "Warning message"'
Warning message at -e line 1.

因此，您的程序正在构建字符串并将它们传递给warn。您必须查看它以删除时间戳