I'm unaware of a native Perl function that will reset the MySQL root password, but there are many nooks and crannies of the language that I'm still discovering. :-)

-Nitrox