in reply to Perl to create Date modified value

You can use mysql stored procedure, if your mysql supported them(at least 5.0 afaik).

In Section Seekers of Perl Wisdom