# use perl -*-Perl-*- 
eval 'exec perl -S $0 ${1+"$@"}' 
  if 0;