Select Code to Download

$ stat abc | grep Mod
Modify: 2017-01-09 15:41:05.405778746 +0000

$ perl -M'IO::Compress::Zip qw(zip)' -e ' zip "abc" => "abc.zip" '

$ cd out
$ unzip ../abc.zip

$ stat abc | grep Mod
Modify: 2017-01-09 15:41:05.000000000 +0000