Re: RFS:libqt-perl 3008-3

[Michael Ablassmeier <abi@grinser.de>]

hi,

On Wed, Mar 14, 2007 at 02:17:09PM +0100, Romain Beauxis wrote:
> and some I even wonder what it is about, like this:
> +eval 'exec /usr/bin/perl  -S $0 ${1+"$@"}'
> +    if 0; # not running under some shell
> +
> repeated a lot of times for two files...

these are coming from MakeMakers fixin function which adjusts the
shebang:

 -- PerlQt/Makefile.PL.in
 [..]
  my @scripts = ("bin/pqtsh", "bin/pqtapi");
 [..]
 for my $s( @scripts )
 {
    MY->fixin( $s );
    chmod 0755, $s;
 }
 --

see /usr/share/perl/5.8.8/ExtUtils/MM_Unix.pm:1060 for how this function
works.

bye,
    - michael