【Perl 】初心者コーナーPart5

ヒントだけでいいんで教えてください。
SAFEってありますよね。
変数のネームスペースにおけるCHROOTみたいなの。
あれの原理って・・・？
Perlには、あれを行うための秘密の機能とかがあるのですか？
モジュールのソースを読んだんですが、原理がわからんです。