Can't call method 'destroy' without a package or object reference at *.pl line *.

Uncaught exception from user code:
Can't call method 'destroy' without a package or object reference at *.pl line *.

main::quit('windowname') called at *.pl line *.