X-Git-Url: https://git.openssl.org/gitweb/?a=blobdiff_plain;f=util%2Fcopy.pl;h=c4aeea6a18cdf667231dbf357f9abddf6602bc6f;hb=a1ca39c02c5507536ee586e787f12f9ea3ea908b;hp=c4bcccdee6b318ed8cc6701c9a67c4bf21d8f607;hpb=e0a651945cb5a70a2abd9902c0fd3e9759d35867;p=openssl.git diff --git a/util/copy.pl b/util/copy.pl index c4bcccdee6..c4aeea6a18 100644 --- a/util/copy.pl +++ b/util/copy.pl @@ -26,7 +26,7 @@ foreach $arg (@ARGV) { next; } $arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob... - foreach (glob $arg) + foreach (glob qq("$arg")) { push @filelist, $_; } @@ -40,7 +40,7 @@ if ($fnum <= 1) } $dest = pop @filelist; - + if ($fnum > 2 && ! -d $dest) { die "Destination must be a directory"; @@ -73,5 +73,5 @@ foreach (@filelist) close(OUT); print "Copying: $_ to $dfile\n"; } - +