#!/bin/sh eval 'exec perl -wS $0 ${1+"$@"}' if 0;