Help for this page

Select Code to Download


  1. or download this
    
use Time::Piece; localtime()->strptime(@ARGV[0], "%Y-%m");
  2. or download this
    
bash$    perl -e 'use Time::Piece; localtime()->strptime(@ARGV[0], "%Y
+-%m"); print "ok\n"; '  "2019-01"
...
Error parsing time at /usr/lib/x86_64-linux-gnu/perl/5.26/Time/Piece.p
+m line 481.