my $time = Time::Piece->strptime("Tue Aug 9 15:39:01 GMT 2022",
                                 "%a %b %e %H:%M:%S %Z %Y");