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