in the perl script aren't you just converting the time to seconds? doesn't the value have to be in nanoseconds?

Code:
	my $password_age = ${$user}{'password_age'}/60/60/24;
	$password_age =~ s/\..*$//;