#!/bin/sh -- # -*- perl -*- -w

# Catch for sh/csh on systems without #! ability.
eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}'
& eval 'exec perl -w -S $0 $argv:q'
    if 0;