Fails to fetch quotes for TSP funds

Finance::Quote fails to fetch quotes for Thrift Savings Plan (TSP) funds, with the error message 'Can't call method "rows" on an undefined value at /usr/share/perl5/HTML/TableExtract.pm line 224.' The attached program demonstrates the problem.

From peeking at /usr/share/perl5/Finance/Quote/TSP.pm, it looks like the Finance::Quote::TSP module needs to be updated to work with the current version of the tsp.gov site. A couple of the obvious problems I see:

* The module tries to fetch prices from http://www.tsp.gov/rates/share-prices.html, which now redirects to https://www.tsp.gov/. The correct page for current prices is https://www.tsp.gov/investmentfunds/shareprice/sharePriceHistory.shtml.
* The module tries to get prices for the L2010 fund (retired 31 Dec 2010) and does not get prices for the L2050 fund (added Jan 2011).

This bug prevents Gnucash from being able to fetch quotes for TSP funds, since it uses Finance::Quote.

This is with libfinance-quote-perl 1.17-1 on Ubuntu 11.10.