diff --git a/src/perl/irssi-core.pl b/src/perl/irssi-core.pl
index e103897a..f9cae269 100644
--- a/src/perl/irssi-core.pl
+++ b/src/perl/irssi-core.pl
@@ -13,7 +13,7 @@ sub is_static {
 }
 
 sub destroy {
-  eval { $_[0]->UNLOAD; };
+  $_[0]->UNLOAD() if $_[0]->can('UNLOAD');
   Symbol::delete_package($_[0]);
 }