Rubyでライブラリをセルフテストする方法として

if $0 == __FILE__
　　xxx
end

ってのがありますが、Perlで同等のことはできませんか？

Perlにはちゃんとテスト用の機構があるのは知ってますが、
・require/use等で使われたときは実行されず、
・直接起動したときだけ実行される
・Perl4でも動作する記法
を知りたいのです。

よろしくおながいします。