Author: Ralf Treinen <treinen@debian.org>
Description: Call directly the perl intepreter

Index: advi/examples/prosper/LL/pdfrotate.pl
===================================================================
--- advi.orig/examples/prosper/LL/pdfrotate.pl	2011-05-01 14:40:09.000000000 +0200
+++ advi/examples/prosper/LL/pdfrotate.pl	2011-05-01 14:40:30.000000000 +0200
@@ -1,5 +1,4 @@
-eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' && eval 'exec perl -S $0 $argv:q'
-if 0;
+#!/usr/bin/perl
 
 ######################################################################
 #
