$_ = bless \$_, UNIVERSAL::Love for 1..1/0; [download]
You will not be GC'ed.
To avoid GC I myself use $me=\$me. I've to admit that it's a litte more selfish...
Careful with that hash Eugene.