diff options
| -rwxr-xr-x | InternetSecure.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/InternetSecure.pm b/InternetSecure.pm index a6240bc..964eb9e 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -85,7 +85,7 @@ sub parse_expdate { ($y, $m) = ($1, $2); } elsif (/^(\d{1,2})\W(\d{4})$/ || # 07-2004 or 7/2004 /^(\d)\W(\d\d)$/ || # 7/04 - /^(\d\d)\/(\d\d)$/) { # 07/04 + /^(\d\d)\/?(\d\d)$/) { # 07/04 or 0704 ($y, $m) = ($2, $1); } else { croak "Unable to parse expiration date: $str"; |