47bd8eff65
$ (echo '#!/usr/bin/perl'; cat /dev/zero) |sed -n '1s|^#![[:space:]]*/|/|p;q' /usr/bin/perl $
21 lines
348 B
Bash
Executable File
21 lines
348 B
Bash
Executable File
#!/bin/sh -efu
|
|
|
|
. @RPMCONFIGDIR@/functions
|
|
. @RPMCONFIGDIR@/find-package
|
|
|
|
ShebangReq()
|
|
{
|
|
local f="$1" line=; shift
|
|
line=$(sed -n '1s|^#![[:space:]]*/|/|p;q' "$f")
|
|
[ -n "$line" ] || return 0
|
|
set -- $line
|
|
case "$#,$1" in
|
|
2,/usr/bin/env)
|
|
FindPackage "$f" "$1" "$2" ;;
|
|
*)
|
|
FindPackage "$f" "$1" ;;
|
|
esac
|
|
}
|
|
|
|
ArgvFileAction ShebangReq "$@"
|