Re: Простой способ получить подробную MTGOX историю торговли
Получается, что если я просто написал сценарий сразу же вместо того, чтобы искать для существующего решения, моя жизнь была бы проще. 🙂
Код:
#! / USR / бен / Perl
использовать предупреждение;
использовать строгий;
использовать JSON;
мой $ так = 1354767190000000; # XXX: Наполните свой собственный; использовать, например, `-D дата '2013-01-01' +% s`
в то время как (1) {
мой $ = decode_json JSON `завитка HTTP: //data.mtgox.com/api/2/BTCUSD/money/trades/fetch так = $ since`;
для моего $ я (@ {$ json->{данные}}) {
печать присоединиться ( '', $ i->{Дата}, $ i->{Цена}, $ i->{Сумма}, $ I->{Trade_type})."\ п";
$ Так = $ i->{} TID + 1;
печать STDERR "$ Так \ п";
}
}
использовать предупреждение;
использовать строгий;
использовать JSON;
мой $ так = 1354767190000000; # XXX: Наполните свой собственный; использовать, например, `-D дата '2013-01-01' +% s`
в то время как (1) {
мой $ = decode_json JSON `завитка HTTP: //data.mtgox.com/api/2/BTCUSD/money/trades/fetch так = $ since`;
для моего $ я (@ {$ json->{данные}}) {
печать присоединиться ( '', $ i->{Дата}, $ i->{Цена}, $ i->{Сумма}, $ I->{Trade_type})."\ п";
$ Так = $ i->{} TID + 1;
печать STDERR "$ Так \ п";
}
}
Этот сценарий Perl создает простой CSV файл с отметкой времени, ценой, количеством и типом торговли. Загрузка стоит год данных занимает несколько часов. Как это загружая данные, он будет печатать обновленный "поскольку" Отметка времени значение для возобновления загрузки позже.
Надеюсь, что это полезно для кого-то.
