Select Code to Download

perl -MTime::Local -lane"END{print$t[1]-$t[0]}$F[1]--;push@t,timelocal
+@F[5,4,3,2,1,6]"

perl -MTime::Local -lane"END{print$t}$F[1]--;$t+=($.*2-3)*timelocal@F[
+5,4,3,2,1,6]"