+s работает только на бинарниках. Скрипты в целях секьюрности не обращают внимания на suid-ный бит.
Прежде чем делать такой вывод почитай про suidperl -- С уважением, Виктор