trešdiena, 2009. gada 2. decembris

SEB bankas fondu vēsturisko datu novilkšanas skripts

Cits prasts skripts vēsturisko fondu vērtību novilkšanai no SEB bankas.


#!/bin/bash

# Jāieraksta pareizs fonda nosaukums
FONDS="SEB Fund 1 Nordic Fund"

# Par cik vecu periodu jāsavāc informācija
VECUMS=$((3*365))

# Tālāk visam jānotiekas automātiski
# Izvadu var savākt kaut vai ar "tee -a"

FONDS_SHORT=`echo $FONDS | tr " " _`
datums=`date --date="-$VECUMS days" +%D`
for i in `seq 1 $VECUMS`
do datums=`date --date="$datums +1day" +%D`
DATUMA_IERAKSTS=`date --date="$datums" +"day="%d"&month="%m"&year="%Y`
echo -ne $datums\\t
lynx -dump "http://www.seb.lv/lv/private/services/investments/funds/SEB/howtoinvest/readmore/prices/values/?$DATUMA_IERAKSTS&cur=EUR&ofTabIndex=0" -show-rate=off -nomargins -nolist |
sed 's/fund/Fund/g ; s/fonds/Fund/g ; /Fund$/N;s/\n */\t/' |
grep "$FONDS" |
sed "s/$FONDS/$FONDS_SHORT/g" |
awk '{print $2"\t"$3}'
done