Perhaps you need to import the diff function explicitly with:

use Algorithm::Diff qw(diff);
[download]

-Blake