FWIW, you may find this script from my ~/bin useful and/or terrifying, after an appropriate modification.
#!/usr/bin/perl
use Date::Parse;
use Time::Duration;
my $birth=str2time("April 11, 1976 06:30"); # approx
print "life day: ".int((time() - $birth)/60/60/24)."\n";eeach, Greg Grossmeier likes this.