1#!/usr/local/bin/perl -w
2#
3# Run the test suite and generate a report
4#
5
6if (! -f "Configure") {
7 print "Please run perl util/selftest.pl in the OpenSSL directory.\n";
8 exit 1;
--- 43 unchanged lines hidden (view full) ---
52$cversion=`$cc -V 2>&1` if $cversion =~ "usage";
53$cversion=`$cc --version` if $cversion eq "";
54$cversion =~ s/Reading specs.*\n//;
55$cversion =~ s/usage.*\n//;
56chomp $cversion;
57
58if (open(IN,"<CHANGES")) {
59 while(<IN>) {
60 if (/\*\) (.{0,55})/) {
61 $last=$1;
62 last;
63 }
64 }
65 close(IN);
66}
67
68print OUT "OpenSSL version: $version\n";
--- 131 unchanged lines hidden ---
2#
3# Run the test suite and generate a report
4#
5
6if (! -f "Configure") {
7 print "Please run perl util/selftest.pl in the OpenSSL directory.\n";
8 exit 1;
--- 43 unchanged lines hidden (view full) ---
52$cversion=`$cc -V 2>&1` if $cversion =~ "usage";
53$cversion=`$cc --version` if $cversion eq "";
54$cversion =~ s/Reading specs.*\n//;
55$cversion =~ s/usage.*\n//;
56chomp $cversion;
57
58if (open(IN,"<CHANGES")) {
59 while(<IN>) {
60 if (/\*\) (.{0,55})/) {
61 $last=$1;
62 last;
63 }
64 }
65 close(IN);
66}
67
68print OUT "OpenSSL version: $version\n";
--- 131 unchanged lines hidden ---