diff options
Diffstat (limited to 'apps/tsget.in')
| -rw-r--r-- | apps/tsget.in | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/apps/tsget.in b/apps/tsget.in index fe029f353a..7067111552 100644 --- a/apps/tsget.in +++ b/apps/tsget.in @@ -1,7 +1,11 @@ #!{- $config{perl} -} -# Written by Zoltan Glozik <zglozik@stones.com>. -# Copyright (c) 2002 The OpenTSA Project. All rights reserved. -$::version = '$Id: tsget,v 1.3 2009/09/07 17:57:18 steve Exp $'; +# Copyright (c) 2002 The OpenTSA Project. All rights reserved. +# Copyright 2002-2016 The OpenSSL Project Authors. All Rights Reserved. +# +# Licensed under the OpenSSL license (the "License"). You may not use +# this file except in compliance with the License. You can obtain a copy +# in the file LICENSE in the source distribution or at +# https://www.openssl.org/source/license.html use strict; use IO::Handle; @@ -42,7 +46,8 @@ sub create_curl { # Error-handling related options. $curl->setopt(CURLOPT_VERBOSE, 1) if $options{d}; $curl->setopt(CURLOPT_FAILONERROR, 1); - $curl->setopt(CURLOPT_USERAGENT, "OpenTSA tsget.pl/" . (split / /, $::version)[2]); + $curl->setopt(CURLOPT_USERAGENT, + "OpenTSA tsget.pl/openssl-{- $config{version} -}"); # Options for POST method. $curl->setopt(CURLOPT_UPLOAD, 1); |