Finance::Quote::USFedBonds Get US Federal Bond redemption values directly from the treasury at www.publicdebt.treas.gov/sav/savvalue.htm
use Finance::Quote; $q = Finance::Quote->new; # Don't know anything about failover yet...
Access redemption values for US Federal Bonds from the treasury.
Bonds should be identified in the following manner (as per www.piblicdebt.treas.gov/sav/savfrmat.htm):
SERIES(1) : I/E/N/S
ISSUEDATE(6) : YYYYMM
SEPERATOR(1) : "."
REDEMPTIONDATE(6) : YYYYMM
Would have liked to get data from this source (http://wwws.publicdebt.treas.gov/BC/SBCPrice), but I couldn't work out how to get the POST to pass the IssueDate, for some reason the <input> tags are messed on that page???
Treasury website - http://www.publicdebt.treas.gov/