Select Code to Download

use warnings;
use strict;
...
*st = sub { Time::Piece->strptime(@_) };

st("Sunday 3rd Nov, 1943", "%A %drd %b, %Y",);