Perl - как получить имя файла скрипта, который выполняется?

Подскажите пожалуйста как в Perl получить имя файла скрипта, который выполняется? Т.е. есть скрипт "test.pl", надо чтобы он сам мог узнать, что его имя - "test.pl".

Скрипт будет запускатся через Web (CGI).

Я нашел такой вариант: my ($package, $filename, $line) = caller;

Но он не совсем подходит т.к. возвращает имя текушего модуля, а мой скрипт делает require ещё нескольких файлов (модулей) и в одном из них надо получить имя вызванного скрипта.

Спасибо!