1Finance::Quote::USFedBoUnsdesr(3C)ontributed Perl DocumeFnitnaatnicoen::Quote::USFedBonds(3)
2
3
4
6 Finance::Quote::USFedBonds Get US Federal Bond redemption values
7 directly from the treasury at www.publicdebt.treas.gov/sav/savvalue.htm
8
10 use Finance::Quote;
11
12 $q = Finance::Quote->new;
13
14 # Don't know anything about failover yet...
15
17 Access redemption values for US Federal Bonds from the treasury.
18
19 Bonds should be identified in the following manner (as per
20 www.piblicdebt.treas.gov/sav/savfrmat.htm):
21
22 SERIES(1) : I/E/N/S
23
24 ISSUEDATE(6) : YYYYMM
25
26 SEPERATOR(1) : "."
27
28 REDEMPTIONDATE(6) : YYYYMM
29
30 e.g. E200101.200501
31
32 Would have liked to get data from this source
33 (http://wwws.publicdebt.treas.gov/BC/SBCPrice), but I couldn't work out
34 how to get the POST to pass the IssueDate, for some reason the <input>
35 tags are messed on that page???
36
38 ...
39
41 Treasury website - http://www.publicdebt.treas.gov/
42
43 Finance::Quote
44
46 for further acknowledgements.
47perl v5.12.2 2011-01-12 Finance::Quote::USFedBonds(3)