summaryrefslogtreecommitdiff
path: root/deps/openssl/openssl/util/dirname.pl
diff options
context:
space:
mode:
Diffstat (limited to 'deps/openssl/openssl/util/dirname.pl')
-rw-r--r--deps/openssl/openssl/util/dirname.pl18
1 files changed, 0 insertions, 18 deletions
diff --git a/deps/openssl/openssl/util/dirname.pl b/deps/openssl/openssl/util/dirname.pl
deleted file mode 100644
index d7a66d96ac..0000000000
--- a/deps/openssl/openssl/util/dirname.pl
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/local/bin/perl
-
-if ($#ARGV < 0) {
- die "dirname.pl: too few arguments\n";
-} elsif ($#ARGV > 0) {
- die "dirname.pl: too many arguments\n";
-}
-
-my $d = $ARGV[0];
-
-if ($d =~ m|.*/.*|) {
- $d =~ s|/[^/]*$||;
-} else {
- $d = ".";
-}
-
-print $d,"\n";
-exit(0);