| Subject: | ACCTID regex mis-match |
My financial institution uses <ACCTID> values of the form
xxxxxxx-txx where x is a digit, dash is a dash, and t is a type (S or L)
which won't match the current regex, and errors out.
I have worked around this issue with the following. You may be able to
do better.... I don't know if my financial institution may not be
following the spec if this field should only allow digits....
at line 103...
if ($all =~ m:<ACCTID>([^<]+)<:s)
{
$aa = $1;
$aa =~ s/\s*$//;
}
$aa;
My setup:
perl version 5.8.8
ubuntu 8.04 w/ all updates as of 1/20/2009
Linux arachnae 2.6.24-23-generic #1 SMP Thu Nov 27 18:44:42 UTC 2008
i686 GNU/Linux
enjoy...