diff options
Diffstat (limited to 'Utilities/cmcurl-7.19.0/tests/libtest/test1022.pl')
-rwxr-xr-x | Utilities/cmcurl-7.19.0/tests/libtest/test1022.pl | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/Utilities/cmcurl-7.19.0/tests/libtest/test1022.pl b/Utilities/cmcurl-7.19.0/tests/libtest/test1022.pl deleted file mode 100755 index 5b16de3..0000000 --- a/Utilities/cmcurl-7.19.0/tests/libtest/test1022.pl +++ /dev/null @@ -1,45 +0,0 @@ -#!/usr/bin/env perl -# Determine if curl-config --version matches the curl --version -if ( $#ARGV != 2 ) -{ - print "Usage: $0 curl-config-script curl-version-output-file version|vernum\n"; - exit 3; -} - -my $what=$ARGV[2]; - -# Read the output of curl --version -open(CURL, "$ARGV[1]") || die "Can't open curl --version list in $ARGV[1]\n"; -$_ = <CURL>; -chomp; -/libcurl\/([\.\d]+(-CVS)?)/; -my $version = $1; -close CURL; - -my $curlconfigversion; - -# Read the output of curl-config --version/--vernum -open(CURLCONFIG, "sh $ARGV[0] --$what|") || die "Can't get curl-config --$what list\n"; -$_ = <CURLCONFIG>; -chomp; -if ( $what eq "version" ) { - /^libcurl ([\.\d]+(-CVS)?)$/ ; - $curlconfigversion = $1; -} -else { - # Convert hex version to decimal for comparison's sake - /^(..)(..)(..)$/ ; - $curlconfigversion = hex($1) . "." . hex($2) . "." . hex($3); - - # Strip off the -CVS from the curl version if it's there - $version =~ s/-CVS$//; -} -close CURLCONFIG; - -my $different = $version ne $curlconfigversion; -if ($different || !$version) { - print "Mismatch in --version:\n"; - print "curl: $version\n"; - print "curl-config: $curlconfigversion\n"; - exit 1; -} |