Remove created_utc property from each comment

It was already included but some people might need the raw value so we
include that too. It's included in brackets after parsed value.

1 files changed, 3 insertions, 4 deletions

diff --git a/draco.pl b/draco.pl
index ee21f06..d3aa5c1 100755
--- a/draco.pl
+++ b/draco.pl
@@ -364,10 +364,9 @@ sub print_comment_chain {
     print ":PROPERTIES:\n";
     print ":CREATED_UTC: ",
         Time::Piece->strptime($comment_data->{created_utc}, '%s')
-          ->strftime('%+'), "\n";
-    foreach my $detail (qw( created_utc author permalink upvote_ratio
-                            ups downs score edited stickied
-                            controversiality )) {
+          ->strftime('%+'), " (=$comment_data->{created_utc}=)\n";
+    foreach my $detail (qw( author permalink upvote_ratio ups downs
+                            score edited stickied controversiality )) {
         print ":${detail}: =$comment_data->{$detail}=\n"
             if scalar $comment_data->{$detail};
     }