in reply to $zip->addTree(...) isn't found.
Not sure about your usage, but you should certainly be able to $zip->addTree("dir1"); without getting that error you reported ... using the latest version of Archive::Zip, anyway.
Which version of Archive::Zip are you running ?
What does 'perldoc Archive::Zip' have to say about the addTree method ?
Cheers,
Rob