Select Code to Download

use Time::Piece;

...

$diff = $now - $before;
print int($diff->days), " days since $before\n";