© 2004
Canonical Ltd.
•
Terms of use
•
Data privacy
•
Contact Launchpad Support
•
Blog
•
Careers
•
System status
•
1b1ed1a
(Get the code!)
Terran,
I updated the branch to (hopefully) function as mentioned. The link is the same as above. I would appreciate a second set of eyes.
I ended up having to use a while loop instead of the join map grep. Perl was hating me. The inline if statements were not making the right decisions against $_ .
example:
s/year//g
inside of the greater string concat
. ( s/year//g ? '' : "RIGHT('0'|| " ) .
was sometimes evaluating "1" when it shouldn't. Perl is suppose to return the number of times it made the replacement. I expect to get "1" when the string appears and "0" when it doesn't which works perfectly in the inline if statement. Except when it doesn't. The while loop is safer.