eval '(exit $?0)' && eval 'exec perl -wS $0 ${1+"$@"}'
   & eval 'exec /usr/bin/perl -wS $0 $argv:q'
           if $running_under_some_shell;