Time-Human is a project mainly written in Perl, it's free.

Convert localtime() format to "speaking clock" time