fork(3) download
  1. #!/usr/bin/perl
  2. # your code goes here
  3.  
  4. use feature 'say';
  5. use Date::Parse;
  6.  
  7. say (str2time("Wed 24 Mar 2021 10:29:09 PM KMT"));
  8. say (str2time("Wed 24 Mar 2021 10:29:09 PM EET"));
  9.  
Success #stdin #stdout 0.02s 6912KB
stdin
Standard input is empty
stdout
1616617749