Notice that you have to explicitly indicate that you want to catch errors:

# 2 = Throw errors, allowing script to deal with it. 
# 3 = Die on errors
$Win32::OLE::Warn = 2;
[download]

---Lars