summaryrefslogtreecommitdiff
path: root/tests/misc/sha384sum
diff options
context:
space:
mode:
Diffstat (limited to 'tests/misc/sha384sum')
-rwxr-xr-xtests/misc/sha384sum12
1 files changed, 2 insertions, 10 deletions
diff --git a/tests/misc/sha384sum b/tests/misc/sha384sum
index bfb9ed092..0eb55872f 100755
--- a/tests/misc/sha384sum
+++ b/tests/misc/sha384sum
@@ -16,16 +16,8 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-: ${PERL=perl}
: ${srcdir=.}
-
-PROG=`echo $0|sed 's,.*/,,'`; export PROG
-
-$PERL -e 'use warnings;' > /dev/null 2>&1 || {
- echo 1>&2 "$0: configure didn't find a usable version of Perl," \
- "so can't run this test"
- exit 77
-}
+. $srcdir/../require-perl
me=`echo $0|sed 's,.*/,,'`
exec $PERL -w -I$srcdir/.. -MCoreutils -M"CuTmpdir qw($me)" -- - <<\EOF
@@ -64,7 +56,7 @@ foreach $t (@Tests)
my $save_temps = $ENV{DEBUG};
my $verbose = $ENV{VERBOSE};
-my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n";
+my $prog = 'sha384sum';
my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose);
exit $fail;
EOF