No need to convert "-" to "/" at ISO8601 date format

sisimai · Dec 19, 2024 · a208738 · a208738
1 parent d2243af
commit a208738
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/lib/Sisimai/Lhost/AmazonSES.pm b/lib/Sisimai/Lhost/AmazonSES.pm
@@ -199,10 +199,8 @@ sub inquire {
     }
     return undef unless $recipients;
 
-    for my $e ( @$dscontents ) {
-        # Time::Piece->strptime() cannot parse "2016-11-25T01:49:01.000Z" format
-        s|-|/|g, s/T/ /, s/[.]\d{3}Z$// for $e->{'date'};
-    }
+    # Time::Piece->strptime() cannot parse "2016-11-25T01:49:01.000Z" format
+    for my $e ( @$dscontents ) { s/T/ /, s/[.]\d{3}Z$// for $e->{'date'} }
 
     # Generate pseudo email headers as the original message
     my $cv = "";