Perl-скрипт не узнает разрешение, если ему не передать его, - он все же на сервере.
А без клиентских скриптов никуда никаким параметром переданы такие данные не будут.