Select Code to Download

#!perl
use strict;
...
my $diff = $now - $before;

print $diff->pretty . " since $before\n";