aboutsummaryrefslogtreecommitdiff
path: root/acme-tinier.pl
diff options
context:
space:
mode:
Diffstat (limited to 'acme-tinier.pl')
-rwxr-xr-xacme-tinier.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/acme-tinier.pl b/acme-tinier.pl
index 6ff2a86..1c32124 100755
--- a/acme-tinier.pl
+++ b/acme-tinier.pl
@@ -57,7 +57,7 @@ sub get {
my $resp = communicate(@args, $url, $data);
die 'cannot download' if $? >> 8;
my ($code, $headers, $body) =
- $resp =~ m#\AHTTP/\d\.\d (\d+) .*?\r\n(.*?)\r\n\r\n(.*)#sm;
+ $resp =~ m#\AHTTP/\d(?:\.\d)? (\d+) .*?\r\n(.*?)\r\n\r\n(.*)#sm;
return ($code, $body, { $headers =~ /(\S+?): (.*)\r\n/mg })
}